|
Guten Tag zusammen,
in einem anderen Thread wurde mir der Tipp gegeben, dass ein Makro über folgenden Befehl gestartet wird, wenn die Excel-Datei geöffnet wird:
Private Sub Workbook_Open()
Call test
End Sub
Warum auch immer klappt dies nicht. Eigentlich möchte ich, dass dieser Quelltext automatisch bei Excel-Start ausgeführt wird.
Sub Daten_kopieren()
' Kopiert die Inhalte der Datenimport-Tabelle in die Datenweiterverarbeitungstabelle. Bestehende Inhalte der Datenweiterverarbeitungstabelle müssen zu Beginn gelöscht werden, damit die Inhalte stets synchron mit der Import-Tabelle sind.
Range("A2:AH1000").Select
Selection.ClearContents
Sheets("Import-Tabelle").Select
Range("A2:AI1000").Select
Selection.Copy
Sheets("Datenweiterverarbeitung").Select
Range("A2").Select
ActiveSheet.Paste
Range("A2").Select
Application.CutCopyMode = False
End Sub
Über den Befehl
Private Sub Workbook_Open()
Call Daten_kopieren
End Sub
möchte ich erreichen, dass oben genanntes Makro automatisch ausgeführt wird. Das Makro wird allerdings nicht automatisch ausgeführt. Woran liegt das / was mache ich falsch?
|