Hallo zusammen.
hab ein Problem. das ich nicht schnalle
Wenn ich folgende Funktion ausführe
a = Sheets("Teams").Range("A17")
a = 90 + a
Worksheets("Teams").Range("D19:D310").Copy _
Destination:=Worksheets("FbH_Chance_CoH").Range(Cells(19, a), Cells(301, a))
bekomme ich den Fehler 1004. Habe natürlich darauf geachtet, das der Name der Tabelle korrekt ist.
Wenn ich das Sheet mit der Nummer anspreche, also:
a = Sheets("Teams").Range("A17")
a = 90 + a
Worksheets("Teams").Range("D19:D310").Copy _
Destination:=Worksheets(6).Range(Cells(19, a), Cells(301, a))
funktioniert es einwandfrei.
Was mache ich falsch?
Danke
Susmark