Hallo, welche Ursache kann es haben, das VBA in dem Quelltext mit dem Unload me Befehl nicht zurechtkommt ?
Quellcode
Private Sub UserForm_Initialize()
'***** Exel Titel ändern
Application.Caption = "Messdienerprogramm für St. Marien"
Application.ActiveWindow.Caption = f_aversion()
'***** auf Tabelle "Programm wechseln"
Worksheets("Programm").Activate
'***** aktuelle Programmversion in Tabelle schreiben
Worksheets("Versionshystorie").Cells(2, 6).Value = f_aversion()
'***** Warten Userform ausblenden
Unload Me
End Sub
|