ich möchte einfach Daten aus einer Tabelle in einige andere (Tabellen 2-43) kopieren.
In der ersten Tabelle (Tabelle2) macht er was er soll, danach gibt er einen Fehler:"Die specialPaste-Methode des Range-Objektes konnte nicht ausgeführt werden" Laufzeitfehler 1004
Was habe ich falsch gemacht?
Vielen Dank
Sub SpotKoordinaten()
ActiveWorkbook.Sheets("S41-1").Range("A20:AG42").Copy
For ii = 2 To 43
'Sheets (i)
ActiveWorkbook.Sheets(ii).Range("A20:AG42").PasteSpecial xlPasteFormulas
Application.CutCopyMode = False
Next
End Sub