Hi,
wenn du Cells innerhalb von Range verwendest, sind immer zwei Angaben notwendig. Also:
Range(Cells(1, 1), Cells(3, 3))
Da du nur eine Zelle ansprechen willst, genügt
Sheets(4).Cells(Wert + 3, 1).Select
Aber, du kannst nur eine Zelle in der Aktiven Tabelle selektieren. Das ist aber in Excel zu 99,9% unnötig. Also:
ActiveWorkbook.Worksheets(2).Range("A1:L9").CopySheets(4).Cells(Wert + 3, 1).Paste
Du kannst bei der Copy-Methode das Ziel direkt angeben. Also:
With ActiveWorkbook .Worksheets(2).Range("A1:L9").Copy .Worksheets(4).Cells(Wert + 3, 1)End With
Gruß
Nepumuk
geschrieben von
Nepumuk2
,
31.10.2005, 08:59 Uhr
, 23 mal gelesen