dynamischen Bereich kopieren
26.04.2007 15:04:00
Joachim
irgendwie steh ich auf'm Schlauch. Warum funktioniert das Makro nicht.
irow = Sheets("gebaeude").Cells(65000, 1).End(xlUp).Offset(1, 0).Row - 1
Sheets("gebaeude").Range(Cells(2, 2), Cells(7, irow)).Select
Selection.Copy
Sheets("Plottliste").Select
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
irow gibt mir die letzte gefüllte Zeilennummer zurück, dann will ich den Bereich B2:G & irow markieren und in das andere Blatt ab B2 kopieren (Werte einfügen).
Laufzeitfehler 1004
Gruss
Joachim