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 , 25 mal gelesen