Suchen, Auswählen, Merken, Drucken

[Alex105]

Also, Schaun und Uwe,

nun habe ich es soweit, dass er mir das erweiterte Menü anzeigt.

Wenn ich nun testweise Artikel kopiere fehlt im beim Übertrag ins neue Tabellenblatt teilweise der Bezug und er kopiert mir noch daten ein, die ich eigentlich ausgeblendet habe... :(

Bekommen wir das evlt. auch noch in den Griff?

Zum Thema "Suche in allen Blättern" ist es bei mir noch immer so, dass er nur in einem Blatt sucht.

Ich danke euch wirklich sehr für eure Hilfe!!!!

@Uwe: was meintest du dann mit deinem Kommentar?

Gruß
Alex

[Kuwer]

@Uwe: was meintest du dann mit deinem Kommentar?

Hallo Alex,

André hätte diese Variante gar nicht zeigen dürfen und schon gar nicht als Voreinstellung.
Das gezielte (wieder) Löschen der selbst hinzugefügten Menüpunkte ist korrekt, mehr darf nicht passieren.

Stell Dir vor, Du hast durch ein anderes AddInn, eine andere Datei/Anwendung, Deiner PERSONL.XLS oder Äquivalentes, spezielle Kontextmenüeinträge eingetragen.
Nun kommt einer daher und meint, "was geht mich das an, weg mit dem ganzen Kram" >> .Reset

Du fändest das mit Sicherheit nicht witzig.

Gruß Uwe

[Alex105]

Guten Morgen Uwe,

vielen Dank, für die Info

Um ehrlich zu sein glaube ich, dass Schauan gemerkt hat, dass ich kein VBA Profi bin und deswegen hat er mir bestimmt (zu Recht) unterstellt, dass es keine weiteren Menüs bei mir gibt Also, alles gut. Ich bin wirklich total dankbar, dass sich überhaupt jemand die Mühe macht, mir zu helfen :) Tolles Forum, mit wirklich hilfsbereiten Menschen hier!

Hoffen wir, dass wir es am Ende schaffen werden.

Viele Grüße und einen guten Start in den Tag.

Alex

[schauan]

Hallo Alex,

Blatt Setup:
Im Makro Sub Kopieren() findest Du folgende Codezeile:

Code:

If tmpWsh.Name <> myWsh.Name Then

Die erweiterst / ersetzt Du so:

Code:

If tmpWsh.Name <> myWsh.Name And myWsh.Name <> "Setup" Then

Ausgeblendete Daten:
Um welche Spalte geht es denn? Nach dem Kopieren kann man die auf dem temporären Blatt auch ausblenden

Bezüge:
Da müsstest Du bitte schreiben, welche - oder im Muster entsprechende Formeln einbauen. Im Moment sind keine drin. Wenn z.B. in J5 die Formel =F5*I5 steht, dann sollte das auch auf dem temporären Blatt funktionieren. Für die Fehleranalyse brauch ich die betreffende Formel.

Hinweise:
Wenn Du Daten in Spalte G eingetragen und dann kopiert hast, stehen die Daten ja noch in Spalte G. Wenn Du anschließend andere Daten suchst, einträgst und dann kopierst, werden die "alten" Daten auch noch mal kopiert. Ich denke, man müsste deswegen die Einträge nach dem Kopieren bei den Originaldaten wieder entfernen oder sich etwas anderes einfallen lassen, damit die nicht doppelt und dreifach kopiert werden. Excel stellt sich da ja genau so dumm an wie der VBA - Programmierer :100:
Ansonsten steht auch noch die Frage, ob in Spalte G Zahlen oder Text eingetragen wird - ich schrieb schon, wegen der Summe als Bedingung für das Kopieren.

[Alex105]

Hallo Schauan,

casual Friday heute was?! :) hab gar nicht so früh mit dir gerechnet. DANKE!!!

Hab ich einkopiert.

Folgende Formeln sind in den Zellen drin (und sollten, wen mögich auch da bleiben. Oder nur das, was drinsteht halt :)

C = A3&B3 (= der Key, der in meinem Warenwirtschaftssystem steht!)
D = "Nur" der Name des Produktes (ganz wichtig, sollte natürlich auch bleiben
E = Preis (keine Formel aber wichtiger Bezugspunkt)
F = =(WENN(Setup!$B$2=10%;Intelligent_Light!E3*0,9;(WENN(Setup!$B$2=15%;Intelligent_Light!E3*0,85;(WENN(Setup!$B$2=20%;Intelligent_Light!E3*0,8;(WENN(Setup!$B$2=25%;Intelligent_Light!E3*0,75;WENN(Setup!$B$2=30%;Intelligent_Light!E3*0,7;"FALSCHE EINGABE")))))))))

G = Tage, die der Kunde was mieten möchte (ist restriktiert auf Maximale Eingabe = 49). Da wird nie text drin stehen (um deine Frage weiter unten zu beantworten)

H = =WENN(G3=1;F3*1;(WENN(G3=2;F3*1;(WENN(G3=3;F3*1;WENN(G3=4;F3*1,125;WENN(G3=5;F3*1,25;WENN(G3=6;F3*1,375;WENN(G3=7;F3*1,5;WENN(G3=8;F3*1,57;WENN(G3=9;F3*1,64;WENN(G3=10;F3*1,71;WENN(G3=11;F3*1,79;WENN(G3=12;F3*1,86;WENN(G3=13;F3*1,93;WENN(G3=14;F3*2;WENN(G3=15;F3*2,07;WENN(G3=16;F3*2,14;WENN(G3=17;F3*2,21;WENN(G3=18;F3*2,29;WENN(G3=19;F3*2,36;WENN(G3=20;F3*2,43;WENN(G3=21;F3*2,5;WENN(G3=22;F3*2,57;WENN(G3=23;F3*2,65;WENN(G3=24;F3*2,72;WENN(G3=25;F3*2,79;WENN(G3=26;F3*2,86;WENN(G3=27;F3*2,93;WENN(G3=28;F3*3;WENN(G3=29;F3*3,08;WENN(G3=30;F3*3,15;WENN(G3=31;F3*3,22;WENN(G3=32;F3*3,29;WENN(G3=33;F3*3,37;WENN(G3=34;F3*3,44;WENN(G3=35;F3*3,5;WENN(G3=36;F3*3,58;WENN(G3=37;F3*3,65;WENN(G3=38;F3*3,73;WENN(G3=39;F3*3,8;WENN(G3=40;F3*3,87;WENN(G3=41;F3*3,94;WENN(G3=42;F3*4;WENN(G3=43;F3*4,09;WENN(G3=44;F3*4,16;WENN(G3=45;F3*4,23;WENN(G3=46;F3*4,3;WENN(G3=47;F3*4,37;WENN(G3=48;F3*4,45;WENN(G3=49;F3*4,5;(WENN(G3=0;"Please enter needed days";"Runtime-Error!")))))))))))))))))))))))))))))))))))))))))))))))))))))

I = benötigte Anzahl (ist auf 999 ristriktiert)
J= =WENN(ISTFEHLER(I3*H3);"Enter needed number";I3*H3)

Kannst du damit was anfangen?! :)

Danke Schauan!!!

Gruß
Alex

[schauan]

Hallo Alex,

dafür bin ich heute Abend weg

Ich nehme an, dass nur die Formel in F ein falsches Ergebnis bringt? Problem ist eventuell der Bezug nach Intelligent_Light!E3 ?
Ich gehe davon aus, dass die Formeln in Zeile 4 alle eine 4 statt der 3 haben, ausgenommen die eventuell der Bezug nach Intelligent_Light!E3 ?
Setup!$B$2 dürfte gleich sein.

Also, wenn die Daten aus einer Zeile 3 wieder in die Zeile 3 eingefügt werden, dann sollte alles stimmen. Das kannst Du ja mal von Hand versuchen.

Wenn Du allerdings Daten aus Zerile 5 in die Zeile 3 einfügst und im Original steht Intelligent_Light!E3, dann wird daraus Intelligent_Light!E1 Mit Daten aus Zeile 6 würde nichts mehr gehen.

Du müsstest in dem Fall Intelligent_Light!$E$3 schreiben.


Falls das jetzt nicht die fehlerhafte Stelle ist, dann müsstest Du das mal schreiben.

[Alex105]

Hi Schauan,

wie, du bist heute Abend weg? :( Wann kommste wieder?! Morgen evtl?! :) naja, wir nähern uns ja gewaltig würde ich sagen

Also, ich hab einfach nochmal die Zelle neu überschrieben ohne den Verweis auf intelligent_light....

Bis jetzt sieht es so aus, als würde er die werte übernehmen....ich probiere es gleich mal mit einem Artikel aus jedem Blatt.

Die Suche ist allerdings noch so, dass er nur auf dem Blatt sucht....

Ergänzende Frage: Wäre es möglich 2 Dinge einzufügen (und unseren PDF Druck noch)

1. Wer hat es als letztes Bearbeitet (ich könnte im Setup Tabellenblatt, wo nur ausgeblendete Hilfsdaten stehen noch eine Zeile mit Name machen (mein Kunde soll dann da den Namen eintragen und das soll am Ende mit übertragen werden)

2. Wäre es möglich, dass wenn er die Werte kopiert wir eine Art überschrift einfügen, von welchem Blatt die daten Stammen?

DANKE :)

Cheerio,
Alex

[Alex105]

Edit: er übernimmt noch nicht die Angaben aus ausgeblendet A&B :(

[schauan]

Hallo Alex,

machen wir erst mal Schritt für Schritt weiter

Mit der Suche gibt es in Excel sehr wahrscheinlich nur die Möglichkeit, mit SENDKEYS zu arbeiten. Das hat allerdings den Nachteil, dass es einen Bug im System gibt. Bei SENDKEYS macht sich die NumLook-Taste selbständig und geht häufig aus. Wenn Du das dem Nutzer zumuten willst, kann ich es einbauen. Ansonsten würde ich eine Meldung ausgeben, die den Nutzer darauf hinweist, umzustellen.

Der PDF-Druck ist ja in der "manuellen" Form schon drin, siehe meine Beschreibung. Ich werde mal den code so ändern, dass das pdf im Verzeichnis und mit dem Namen der Exceldatei ausgegeben wird. Allerdings würde eine eventuell schon vorhandene Datei gleichen Namens dann überschrieben.

[Alex105]

Oh man Schauan,

wie kann ich mich nur für die tolle Hilfe bei dir bedanken?! Ahh warte, ich hab eine Idee....dazu später mehr :)

Warum das natürlich mit dem Key in Spalte C nicht läuft weiß ich nicht. Und er zeigt den Bezugsfehler auch nicht immer sonder nur sporadisch....


Und zu deiner Frage von vorher: Klar, es wäre gut, dass wenn der Kunde sich entscheidet doch etwas zu ändern etc. dass die Werte nicht addiert werden.

Die Idee mit dem Hinweis bei der suche finde ich ziemlich gut :). Kannst du gerne so machen (also mit ner Infobox).

Danke! :)
Gruß
Alex