Re: UserForm als Startmenü
26.03.2003 22:36:19
Thomas.Leuna
Danke Lutz. Leider funktioniert es nicht ganz. Mit UserForm1.Hide blende ich beim Aufruf der externen Dateien mein "Startmenü" aus. Nach Einfügen Deines Codes wird zwar die andere Datei geöffnet, aber die UserForm steht wieder davor.Mein jetziger Weg zur anderen Datei:
Private Sub Besuchsdienst_Click()
'Ausblenden der UserForm
UserForm1.Hide
'Starten der ausgewählten Datei
Workbooks.Open Filename:="T:\test.xls"
End Sub
Der Weg zurück:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close
Workbooks("Start1.xls").Activate
End Sub
Und hier geht es nicht weiter, weil ich die Userform nicht wieder einblenden kann. Dein Vorschlag ist es leider nicht ganz. Oder was mache ich falsch?
Thomas