Thema Datum  Von Nutzer Rating
Antwort
Rot Makro starten wenn Excel-Datei geöffnet wird
 11.05.2016 13:26:26 VBA Anfänger
NotSolved
11.05.2016 14:16:55 SJ
NotSolved
11.05.2016 14:33:35 Gast88637
NotSolved
11.05.2016 14:43:03 VBA Anfänger
NotSolved
11.05.2016 14:59:21 SJ
NotSolved
11.05.2016 15:23:56 VBA Anfänger
NotSolved
11.05.2016 15:35:56 SJ
NotSolved
11.05.2016 15:37:27 SJ
NotSolved
11.05.2016 15:36:16 VBA Anfänger
NotSolved
11.05.2016 15:39:50 SJ
NotSolved
11.05.2016 15:44:47 VBA Anfänger
NotSolved
11.05.2016 15:48:51 SJ
NotSolved
11.05.2016 15:52:39 Gast29449
NotSolved
11.05.2016 15:56:23 VBA Anfänger
NotSolved
11.05.2016 18:04:12 VBA Anfänger
NotSolved
12.05.2016 07:34:30 SJ
NotSolved
12.05.2016 08:34:54 VBA Anfänger
NotSolved
12.05.2016 08:51:11 VBA Anfänger
NotSolved
12.05.2016 09:01:20 SJ
NotSolved
12.05.2016 09:01:54 Crazy Tom
NotSolved
12.05.2016 09:12:36 Gast14630
NotSolved
12.05.2016 09:13:23 VBA Anfänger
NotSolved
12.05.2016 09:20:16 Crazy Tom
NotSolved
12.05.2016 09:33:51 VBA Anfänger
NotSolved
12.05.2016 15:36:39 David
NotSolved
13.05.2016 07:42:33 SJ
NotSolved
13.05.2016 10:01:27 David
NotSolved

Ansicht des Beitrags:
Von:
VBA Anfänger		 Datum:
11.05.2016 13:26:26		 Views:
2779		 Rating:
     
Antwort:
  Ja
Thema:
Makro starten wenn Excel-Datei geöffnet wird

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:
 

?
1
2
3
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.

 

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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

?
1
2
3
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?

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Makro starten wenn Excel-Datei geöffnet wird
 11.05.2016 13:26:26 VBA Anfänger
NotSolved
11.05.2016 14:16:55 SJ
NotSolved
11.05.2016 14:33:35 Gast88637
NotSolved
11.05.2016 14:43:03 VBA Anfänger
NotSolved
11.05.2016 14:59:21 SJ
NotSolved
11.05.2016 15:23:56 VBA Anfänger
NotSolved
11.05.2016 15:35:56 SJ
NotSolved
11.05.2016 15:37:27 SJ
NotSolved
11.05.2016 15:36:16 VBA Anfänger
NotSolved
11.05.2016 15:39:50 SJ
NotSolved
11.05.2016 15:44:47 VBA Anfänger
NotSolved
11.05.2016 15:48:51 SJ
NotSolved
11.05.2016 15:52:39 Gast29449
NotSolved
11.05.2016 15:56:23 VBA Anfänger
NotSolved
11.05.2016 18:04:12 VBA Anfänger
NotSolved
12.05.2016 07:34:30 SJ
NotSolved
12.05.2016 08:34:54 VBA Anfänger
NotSolved
12.05.2016 08:51:11 VBA Anfänger
NotSolved
12.05.2016 09:01:20 SJ
NotSolved
12.05.2016 09:01:54 Crazy Tom
NotSolved
12.05.2016 09:12:36 Gast14630
NotSolved
12.05.2016 09:13:23 VBA Anfänger
NotSolved
12.05.2016 09:20:16 Crazy Tom
NotSolved
12.05.2016 09:33:51 VBA Anfänger
NotSolved
12.05.2016 15:36:39 David
NotSolved
13.05.2016 07:42:33 SJ
NotSolved
13.05.2016 10:01:27 David
NotSolved