Danke Peter, das war einen Stern wert.
Gruß, Andreas
Hi Reinhard,
danke für Deine Nachricht - es war schon ein bischen 
depremierend Euch zu zuhören bzw. mitzulesen - verstanden hab ich Nichts 
) . Trotzdem Danke an euch Beiden für den regen Meinungsaustausch. Heute hab ich mich an Deiner Liste versucht - leider bekomme ich einen LaufzeitFehler ‚1004‘ Anwendungs- oder objektdefinierter Fehler bereits bei der 3. Zeile
" Zei = wksTN.Range(„B5“).End(x1Down).Row " ! und was mach ich jetzt??
Grüße Franz
Hallo Franz,
Hi Reinhard,
danke für Deine Nachricht - es war schon ein bischen
depremierend Euch zu zuhören bzw. mitzulesen - verstanden hab
ich Nichts
Meinungsaustausch.
Auch von mir noch mal Sorry für unsere Fachsimpelei. Ich geb zu, sie gehörte nicht hier her.
Heute hab ich mich an Deiner Liste versucht
- leider bekomme ich einen LaufzeitFehler ‚1004‘ Anwendungs-
oder objektdefinierter Fehler bereits bei der 3. Zeile
" Zei = wksTN.Range(„B5“).End(x1Down).Row " ! und was mach
ich jetzt??
Hast du die Zeile mit dem Fehler hier von Hand reingetippt oder aus dem Code rauskopiert?
Da ist nämlich ein Fehler in der Zeile, der beim Kopieren nicht entstehen kann:
In der Klammer hinter End muss es x l Down heißen, nicht x 1 Down.
Falls das im Code wirklich so drin steht, ändere es.
Allerdings dürfte der Laufzeitfehler 1004 auch nur aufgetreten sein, wenn du die erste Zeile aus Reinhards Code
Option Explicit
nicht in deine Mappe kopiert hast.
Falls Option Explicit bei dir drin steht und du in der Klammer x1down hast, müsste der Fehler geheißen haben: Variable nicht definiert.
Also schau bitte mal nach, dass es in der Klammer xlDown steht und dass oben im Code „Option Explicit“ steht.
Grüße Franz
Gruß, Andreas
Hallo Andreas,
danke für Deine Mail und es gibt keinen Grund sich zu entschuldigen, ich finde es toll Spezialisten zu zusehen bzw. mitzulesen - auch wenn ich nichts verstanden habe. Auch Danke für Deine Ergänzung - Explicit hatte ich tatsächlich nicht eingetragen, diese Zeile mit Option Explicit war mir neu und da sie vor Sub stand, hab ich sie ignoriert. Jetzt ist sie jedenfalls drin. Auch die Verbesserung von IxDown // ich hatte eine 1 genommen, jetzt verbessert mit einem großen i - hoffe das ist das richtige Zeichen?? // denoch bekomme ich einen Laufzeitfehler „13“ / Typen unverträglich. Beim Debuggen wird mir die Zeile : Set wksTN = Worksheets(„TN-List“) farbig hinterlegt.
Wenn ich mit der Maus über den Eintrag „xIDown“ fahre, erscheint ein Fenster mit Eintrag xIDown=-4121ist das OK??
Sorry dass ich mich vielleicht zu blöd anstelle - Macros gehen bei mir noch in sehr begrenztem Rahmen - VBA absolut NADA. Danke für Deine Mühen
Gruß Franz
Hi Andreas,
Kommando zurück - hab gerade nochmals den Code von Reinhard per Copy übertragen und jetzt läufts - lediglich am Ende bekomme ich noch einen Laufzeitfehler „13“ wegen einer verbundenen Zelle aber den bekomme ich hoffentlich selbst in den Griff - andernfalls würde ich mich nochmals melden. Jetzt erstmal Euch Beiden Dir und Reinhard herzlichsten Dank Ihr habt mir sehr geholfen.
Danke nochmals und Grüße
OT Tipps zu Vba
Hallo Franz,
ich finde es toll Spezialisten zu zusehen bzw.
mitzulesen - auch wenn ich nichts verstanden habe.
okay, im Sinne deiner Anfrage war wenig dabei. Aber das grundsätzliche,
daß Dim und der Datentyp dabei wie gezeigt immense Auswirkungen haben
kann ist etwas was bei dir hängengeblieben sein dürfte.
Auch Danke
für Deine Ergänzung - Explicit hatte ich tatsächlich nicht
eingetragen, diese Zeile mit Option Explicit war mir neu und
da sie vor Sub stand, hab ich sie ignoriert.
Was ich hinschreibe ignoriert, hä? Tztz, *schelt* )
Es geht zwar auch ohne aber glaub mir bitte, auf Dauer überwiegen die Vorteile.
In neuen Mappen mußte das gar nicht selbst hinschreiben, geh auf Extras
und [X] Variablendeklaration erforderlich.
Dann steht das automatisch immer in allen Modulen.
Dann brav Dim benutzen. So z.B.:
Sub Test()
Dim LetzteZeileInA as long
Dabei keine Angst vor langen „sprechenden“ Namen. Wenn du die Variable
im Code brauchst schreib
let und drück Strg+Leertaste…
Auch die Verbesserung von IxDown // ich hatte
eine 1 genommen,
An xldown gibts nix mehr zu verbessern. xldown ist in Excel eine sogenannte
benannte Zahlkonstante. PI ist da vergleichbar.
xl ist die Abkürzung für Excel. In Word heißen die z.B. wdXYZ.
Gibt auch vb für Visualbasic, z.B. bei vbLF
jetzt verbessert mit einem großen i - hoffe
das ist das richtige Zeichen??
Groß-klein ist dem Vba-Debugger in dem Fall egal, er korrigiert das schon so
wie es sein soll. Allerdings die Buchstabenreihenfolge muß schon stimmen.
// denoch bekomme ich einen
Laufzeitfehler „13“ / Typen unverträglich. Beim Debuggen wird
mir die Zeile : Set wksTN = Worksheets(„TN-List“) farbig
hinterlegt.
Wenn es Worksheets(„TN-List“) nicht gäbe käme Fehler 9, diesen Index gibt es nicht.
Also bedeutet der Fehler wohl daß wksTN nicht als Worksheet deklariert ist.
Wenn ich mit der Maus über den Eintrag „xIDown“ fahre,
erscheint ein Fenster mit Eintrag xIDown=-4121ist das OK??
Ja, das ist okay. xldown ist der Name für den Zahlenwert -4142
Gruß
Reinhard