Kopieren von Zellinhalten aus anderer Datei
27.09.2004 12:01:25
Zellinhalten
Sub Waage_uebertragen()
Application.ScreenUpdating = False
Sheets("Daten").Activate
With (Cells(24, 2))
.Range("B2:J300").Copy Range("B2:J300")
End With
Sheets("Turnierdaten").Activate
Application.ScreenUpdating = True
MsgBox "Daten von der Waage übertragen !"
End Sub
Ich möchte von der einen Datei in Tabelle "Tabelle1" nach "Daten" in der anderen Datei Daten kopieren. Das funktioniert aber nicht. Es macht irgendwas nicht nachvollziehbares.
Danke,
Tobias
Anzeige