Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Fermer un userform après 3 secondes

2 réponses
Avatar
Florian
Bonsoir
je désire lancer
un userform et que celui-ci se ferme automatiquement dans 3 secondes
Merci beaucoup
Flo riant

2 réponses

Avatar
LSteph
Bonsoir Florian,

'''***dans module

Sub affiche()
UserForm1.Show
End Sub

Sub referme()
UserForm1.Hide
End Sub

'''***dans code uf
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:03"), _
"referme"
End Sub

'***

'lSteph
"Florian" a écrit dans le message de news:

Bonsoir
je désire lancer
un userform et que celui-ci se ferme automatiquement dans 3 secondes
Merci beaucoup
Flo riant




Avatar
Florian
Parfait
Merci beaucoup Lsteph
Flo riant

"LSteph" a écrit dans le message de news:

Bonsoir Florian,

'''***dans module

Sub affiche()
UserForm1.Show
End Sub

Sub referme()
UserForm1.Hide
End Sub

'''***dans code uf
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:03"), _
"referme"
End Sub

'***

'lSteph
"Florian" a écrit dans le message de news:

Bonsoir
je désire lancer
un userform et que celui-ci se ferme automatiquement dans 3 secondes
Merci beaucoup
Flo riant