unter Recherche bin ich auf folgenden Code gestossen. Wie müßte ich ihn umarbeiten, wenn ich anstelle des darin benannten Datenblattes ("Tabelle3") das jeweils aktive Tabellenblatt ansprechen möchte? - Danke schon jetzt wieder Allen für die Mithilfe.
Gruß - Wolfgang
Sub Kopieren
Worksheets("AT-Teile").Range("Y2:Y2000").Copy Destination:=Worksheets("Tabelle3").Range("A6")
Worksheets("AT-Teile").Range("G2:G2000").Copy Destination:=Worksheets("Tabelle3").Range("B6")
End Sub