Thema: Kopieren

Moin,

ich habe 3 Mappen in denen jeweils eine Tabelle hinterlegt ist.
Die kopiere ich mit einem Makro in die 4 Datei.

Das funktioniert auch.

Das Problem besteht darin, das diese Tabellen unter schiedlich lang sein können.
Das heißt das in der einen Mappe die Tabelle von A1 - N9 geht, aber im nächsten Monat kann sie auch von A1 - N12 gehen.
So kann es auch in den anderen Mappen sein.
der Kopierstatus müsste variabel sein.

Desweiteren ändern sich die Namen der 3 Datein im nächsten Monat.
Ich müsste also, wenn das Makro in das Verzeichnis geht selbst auf die Dateien klicken.

Danke

Gruß Pitt

Hallo

Und wie sieht dein Makro aus?


LG UweD

Hallo

die 1 Frage ist leicht zu löscen, s. unten. Suche nach der LastZell. Spalte A muss aber bis zum Ende Daten haben!
Im Internet fíndest du viele Codes, mit denen du eine Datei per VBA Öffnen kannst. Einfach runterladen und testen.
'LastZell in Spalte A suchen
lz1 = Cells(Rows.Count, 1).End(xlUp).Row
Range("A1:N" & lz1).Copy

mfg Piet

Moin Piet,

so ganz ist es leider noch nicht.

Nach dieser Tabelle kommen 2 leere Zellen und dann kommen noch 2 Spalten mit Einträgen, die mit kopiert werden müssen.
Danke
Gruß Pitt

Hallo Peter

ich weiß nicht, Namensvetter, ob ich das richtig verstanden habe?? 2 Leerzeilen ist kein Problem.
lz1 = Cells(Rows.Count, 1).End(xlUp).Row + 2 --> oder unten bei Range +2 setzen
Range("A1:N" & lz1 +2).Copy
Den Spaltenbereich kannst du doch von "N" auf "P" setzen. Oder habe ich das falsch verstanden?

mfg Piet

Danke Piet, dass Du Dir nochmal die Zeit genommen hast um zu Antworten.
Werde Heute Abend nochmal mein Glück versuchen.
Danke

Gruß Pitt