Affichage d'un userform pendant 3 sec

[akibodo]

Bonsoir à tous,

J'ai un petit soucis, j'essaye de faire apparaitre un userform pendant 3 secondes (et qu'il se referme tout seul, sans action) à partir d'un bouton sur un autre userform.

Malheureusement ça marche pas :/

Merci pour les idées.

 

[Staple1600]

Re : Affichage d'un userform pendant 3 sec

Bonsoir

Dans un module
Sub KillForm()
Unload UserForm1
End Sub


Dans le code de l'userform
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:03"), "KillForm"
End Sub


source:
ozgrid

 

[pierrejean]

Re : Affichage d'un userform pendant 3 sec

bonjour akibodo

Cela peut marcher avec des Userform ayant showmodal a False
Vois ci-joint

 

[skoobi]

Re : Affichage d'un userform pendant 3 sec

Bonsoir tout le monde,

Salut Pierrejean
Salut JM

3eme solution.

Edit: Si vous avez des remarques à faire sur ma petite appli....ici

 

[akibodo]

Re : Affichage d'un userform pendant 3 sec

Re à tous,

Merci pour ces réponses je vais étudier ça

A+