sobald die Datei geöffnet wird, soll automatisch das Userform geladen werden. Daneben sollen automatisch die geöffneten Tabellen ausgeblendet werden, so dass man nur noch dass Userform sieht.
Vielen Dank.
auto_open()
ActiveWindow.WindowState = xlMinimized
userform1.show
end sub
Gruss
moe
Gruss
moe
wird beim Öffnen der Datei nicht das UserForm geöffnet.
Vielen Dank
Gruss
moe
sub auto_open()
ActiveWindow.WindowState = xlMinimized
userform1.show
end sub
sorry, dass ich mich einmische, aber müßte die Private Sub nicht "Workbook_open" statt "auto_open" heißen?
Vor allem muß sie in "Diese Arbeitsmappe" stehen.
Gruß
Bertram
Normalerweise macht es keinen Unterschied ist beides möglich.
Ausserdem Bei mir funktioniert es .
Test es mal selber
Moe
schick mir mal die Datei zu .
Ich bring sie zum laufen .
Wenn du einverstanden bist sag mir bescheid
Gruss
moe
Code eingefügt mit Syntaxhighlighter 1.14
Private Sub Workbook_Open()
ActiveWindow.WindowState = xlMinimized
UserForm1.Show
End Sub
Gruß
Bertram
Gruss
moe