Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
468to472
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Workbook_Open() funktioniert nicht

Workbook_Open() funktioniert nicht
13.08.2004 10:11:01
Stephan
Hallo Zusammen,
ich hab grade das Problem, dass das Ereignis Workbook_open wohl nicht erfolgt. Leider lässt sich in der Sub schlecht debuggen (oder gibt's da einen Trick?). Der Code an sich, wenn ich ihn später ausführen lasse, funktioniert. Aber eben nicht beim Öffnen der Datei. Ich habe meinen Code in dieser Sub nun schon auf ein Activate des ersten Tabellenblatts beschränkt, aber selbst das passiert nicht.
Hat jemand eine Idee, woran das liegen kann?
Gruß,
Stephan

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Workbook_Open() funktioniert nicht
geri
Stephan
hast du Workbok open auch richtig eingefügt
in "diese Arbeitsmappe" ?
speichern und File wieder öffnen
gruss geri
AW: Workbook_Open() funktioniert nicht
Stephan
Klar, das steht schon alles da, wo es hingehört. Workbook_BeforeClose und Workbook_SheetBeforeRightClick usw. funktionieren auch einwandfrei. Nur das Open-Ereignis kommt eben irgendwie nicht.
Kann man das (aus Versehen) irgendwo abschalten?!
Gruß,
Stephan.
AW: Workbook_Open() funktioniert nicht
13.08.2004 10:41:26
Patrick
Due gehts in VB editor also ALT + F11 dann sieht du ja links den Projekt Explorer Da klickste doppelt auf arbeitsmappe und dann oben in der Combobox Allgemein steht gehste auf Workbook dan sollte das gehen
Anzeige
AW: Workbook_Open() funktioniert nicht
Stephan
Wie gesagt, das steht schon alles da, wo es hingehört und die anderen Ereignisse wie Workbook_BeforeClose und Workbook_SheetBeforeRightClick usw. funktionieren auch einwandfrei. Nur das Open-Ereignis kommt eben irgendwie nicht.
Gruß,
Stephan.
AW: Workbook_Open() funktioniert nicht
geri
Stephan
stell doch mal den Code rein, dann sieht man mehr
gruss geri
AW: Workbook_Open() funktioniert nicht
Stephan
Gerne. In "DieseArbeitsmappe" gibt es nachfolgende Subs. In Workbook_open stand mal deutlich mehr Code, aber inzwischen funzt nicht mal mehr ein MsgBox "Hallo" oder ähnliches.
Einziger Anhaltspunkt wäre noch, dass ich zwischenzeitlich über 800 Names definiert habe. Hat Excel damit vielleicht Schwierigkeiten beim Öffnen?

Private Sub Workbook_Open()
Worksheets("DB").Activate
End Sub



Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim tCBar As CommandBar
For Each tCBar In Application.CommandBars
If Not tCBar.BuiltIn Then
tCBar.Delete
End If
Next tCBar
End Sub



Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Excel.Range, Cancel As Boolean)
Cancel = True
End Sub

Anzeige
AW: Workbook_Open() funktioniert nicht
geri
Hallo Stephan
also Code läuft, sehe keinen Fehler getestet mit XP
hast du schon mal versucht, dies in einem neuen File
laufen zu lasen ?
gruss geri

40 Forumthreads zu ähnlichen Themen

Private Sub open geht nicht gut
Lukas

Hi Allerseits
Kann mir jemand von Euch helfen'
Ich starte die Datei mit Private Sub Workbook_Open() und lasse die Willkommenseite als Userform öffnen. Bis dahin alles i.O. Private Sub Workbook_Open() On Error Resume Next Application.Visible = False Application.ScreenUpdating = False...
14.02.2009 14:03:00
Thread-ID: 1050709
7 Beiträge
Anzeige
Private Sub Workbook_Open()
Sandra

Hallo zusammen,
mittels dieses Ereignisses erhält mein Chef montags und mittags beim Öffnen der Datei eine Info:
Private Sub Workbook_Open() Sheets("Übersicht").Select If Weekday(Date, 2) = 1 Or Weekday(Date, 2) = 3 Then MsgBox "über ..... informieren!" End If End Sub
Dummerweise...
16.10.2009 17:36:38
Thread-ID: 1110164
7 Beiträge
Private Sub WorkbookOpen() | Herbers Excel-Forum
Heinz H
Hallo Leute
Ich habe unten den Code. Wenn Arbeitsmappe öffnen dann, von Sheet "OrgWert" B4:B13 in
Sheet "Prüfungen" B4:B13 kopieren.
Ist hier ein Fehler ?
Denn es wird nicht immer kopiert.
Gruß
Heinz
Private Sub Workbook_Open()
Sheets("OrgWert").Range("B4:B13").Copy<...
31.01.2010 17:59:02
Thread-ID: 1134636
4 Beiträge
Anzeige
Private Sub Workbook_BeforeClose
Scot

Liebe Leute
Ich hab mal wieder ein kleines Problem. Folgendes habe ich in "DieseArbeitsmappe" geschrieben:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.ScreenUpdating = False Application.MoveAfterReturnDirection = xlDown Application.CommandBars("Standard").Visible =...
22.09.2011 13:56:18
Thread-ID: 1231079
11 Beiträge
Sub Workbook_Open()
Manfred

Hallo zusammen,
ist es möglich nach einem Sub Workbook_Open() dierekt auf das Blatt KALENDER zu springen ? Ich bekomme das einfach nichthin. Sub Workbook_Open() 'hier werden die Tabellen versteckt Sheets("Passwort").Visible = 2 Sheets("Benutzer_01").Visible = 2 'Die Passwortabfrage sollt...
22.08.2013 09:53:58
Thread-ID: 1327935
2 Beiträge
Zwei unterschiedliche Private Sub Workbook_Sheet..
Alex

Hallo Herr Herber,
ich fürchte, dass ich bei einer Kombination aus zwei VBA-Codes nicht weiterkomme.
Ich habe einen Urlaubsplaner auf der Arbeit.
Bei diesem habe ich den Code (aus dem Netz) eingebettet, der die Datei nach 10 unbenutzten Minuten automatisch schließt.
Link: http:/...
15.01.2015 08:26:00
Thread-ID: 1402921
2 Beiträge
Private Sub Workbook_BeforeClose
Heinz

Hallo Leute
Könnte man den unteren Code etwas eleganter schreiben?
Denn wenn ich die Arbeitsmappe schließe, Flackert der Bildschirm so lange bis alle Sheets geschlossen sind.
Also etwa im Hintergrund schließen.
Danke & gruß Heinz Private Sub Workbook_BeforeClose(Cancel As B...
18.08.2015 21:00:19
Thread-ID: 1443017
3 Beiträge
Private Sub Workbook_Open() aus AddIn in Datei
Veit

Hallo,
ich suche ein Möglichkeit einer neuen EXCEL-Datei aus einem AddIn heraus ein Start-Makro zuzuweisen. Hintergrund der Geschichte ist, daß sobald eine zum AddIn gehörende Datei geöffnet wird schon die ersten Makros aus dem Addin ausgeführt werden sollen.
Gibt es da eine Möglichkeit?...
20.08.2002 14:55:16
Thread-ID: 150664
4 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
2
6
3
2
10
1
1
2
3
1
4
10
9
3
4
4
3
7
4
1
5
7
1
1