Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Home Zurück Vor

Download Beispiel-Arbeitsmappe

Thema

Vorlagendialog beim Öffnen einer Arbeitsmappe aufrufen

Gruppe

Open

Problem

Beim Öffnen von Excel soll automatisch der Dialog zur Auswahl der Vorlagen aufgerufen werden.

Lösung

Geben Sie den Ereigniscode in das Klassenmodul der Arbeitsmappe ein.

ClassModule: DieseArbeitsmappe

Private Sub Workbook_Open()
   Dim oBtn As CommandBarButton
   Set oBtn = Application.CommandBars.FindControl(ID:=18)
   oBtn.Execute
   ThisWorkbook.Close savechanges:=False
End Sub