Userform automatischer Aufruf

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Userform automatischer Aufruf von: Benjamin
Geschrieben am: 24.03.2005 07:31:05

Hallo,
ich habe eine "Anwendung" gebastelt wo bei dem Aufruf ein entsprechendes Userform aufgerufen werden soll. Dieses Userform soll immer beim Öffnen der Datei aufgerufen werden, auch wenn der User die Datei in einer anderen Arbeitsmappe verlassen hat.

Ich habe folgenden Code in "Diese Arbeitsmappe" erstellt, aber irgendwie funktioniert das nicht.

Die gesamte Datei kann ich leider nicht hochladen (Firewall verhindert dies)



'Symbolleisten ausblenden


Private Sub Workbook_Open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
 cb.Enabled = False
Next cb
With ActiveWindow
 .DisplayHeadings = False
 .DisplayHorizontalScrollBar = True
 .DisplayVerticalScrollBar = False
 .DisplayWorkbookTabs = False
End With
With Application
 .DisplayStatusBar = False
 .DisplayFormulaBar = False
End With
End Sub

'Userform einblenden und ausführen lassen

Private Sub Worksheet_Activate()
 UserForm5.Show
End Sub


'Symbolleisten einblenden

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim cb As CommandBar
For Each cb In Application.CommandBars
 cb.Enabled = True
Next cb
With ActiveWindow
 .DisplayHeadings = True
 .DisplayHorizontalScrollBar = True
 .DisplayVerticalScrollBar = True
 .DisplayWorkbookTabs = True
End With
With Application
 .DisplayStatusBar = True
 .DisplayFormulaBar = True
End With
End Sub



Wo liegt denn mein Fehler?

Im Voraus besten Dank
Benjamin
Bild


Betrifft: AW: Userform automatischer Aufruf von: Hajo_Zi
Geschrieben am: 24.03.2005 07:34:51

Hallo Benjamin,

du schreibst
" Dieses Userform soll immer beim Öffnen" Ich würde dann das Open Ereignis benutzen.

Kannst Du mal schreiben was nicht geht. Du hast die Datei und ich muß Sie erst nachbauen. Da Habe ich andere Sachen zu tun.


Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.




Bild


Betrifft: AW: Userform automatischer Aufruf von: Benjamin
Geschrieben am: 24.03.2005 07:38:57

Also ich öffne die Datei und die Symbolleisten, etc. werden auch ausgeblendet.
Das Userform öffnet sich allerdings nicht.

Wie erzeuge ich denn dieses Open Ereignis?

Ich denke mal, dass ich diesen Code ändern müüste


'Userform einblenden und ausführen lassen

Private Sub Worksheet_Activate()
 UserForm5.Show
End Sub



oder?

Aber wie??


Bild


Betrifft: AW: Userform automatischer Aufruf von: Hajo_Zi
Geschrieben am: 24.03.2005 07:56:10

Hallo Benjamin,

Du hast Doch schon das Open Ereignis

Private Sub Workbook_Open()

Gruß Hajo

Das Forum lebt auch von den Rückmeldungen.


Bild


Betrifft: AW: Userform automatischer Aufruf von: Benjamin
Geschrieben am: 24.03.2005 08:34:29

Ach so ...

Okay, jetzt hab ich es kapiert

Danke schön


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Userform automatischer Aufruf"