Danke das es Euch gibt!
Wie kann ich denn nun mit ein paar einfachen Befehlen eine UF für 3 Sekunden einblenden? Sie soll anschließend wieder verschwinden.
Danke für Eure Hilfe.
Gruß Micha
Private Sub UserForm_Activate()
Dim time As Single
time = Timer
Do While Timer < time + 3
DoEvents
Loop
UserForm1.Hide
End Sub
Private Sub UserForm_Activate()
Dim time As Single
time = Timer
Do While Timer < time + 3
DoEvents
Loop
UserForm1.Hide
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen