Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Compte à rebours, puis lancer une macro, puis userform

PatLac

XLDnaute Occasionnel
Bonjour à tous !
J´ai besoin de vos lumières, car les différents post lus sur le forum ne répondent pas à mes attentes.

Donc voila :
Je voudrais qu´a l´ouverture d´un classeur, un décompte se mette à tourner (hh:mn:sec) en A1 par exemple, une fois qu´il arrive à zéro une macro se lance (macro1, par exemple) et que dans la foulée un userform apparaisse avec un gif animé ...

Vous avez une idée?

D´avance merci.

Bonne soirée à tous.
 

xhudi69

XLDnaute Accro
Re : Compte à rebours, puis lancer une macro, puis userform

Bonsoir PatLac, le Forum,

Pourquoi pas ceci:
Code:
Private Sub Workbook_Open()
Application.WindowState = xlMinimized
UserForm1.Show
End Sub
Puis:
Code:
Private Sub UserForm_Activate()
Application.Wait (Now + TimeValue("00:00:05"))
 'Ici tu lance ta macro.....
End Sub
Puisque tu es déjà sur l'UserForm, c'est plus facile..........

@+
 

PatLac

XLDnaute Occasionnel
Re : Compte à rebours, puis lancer une macro, puis userform

Bonjour et merci !
Ca fonctionne, mais il faudrait vraiment que la chronologie soit comme décrite ... c'est possible ?
Sinon c'est pas bien grave ....
Merci.
 

laetitia90

XLDnaute Barbatruc
Re : Compte à rebours, puis lancer une macro, puis userform

bonjour PatLac,xhudi69
un exemple a adapter
 

Pièces jointes

  • Classeur1.xls
    42 KB · Affichages: 93
  • Classeur1.xls
    42 KB · Affichages: 71
  • Classeur1.xls
    42 KB · Affichages: 87

PatLac

XLDnaute Occasionnel
Re : Compte à rebours, puis lancer une macro, puis userform

Mais c´est parfait tout cela !
Comme quoi la femme est bien l´avenir de l´homme ...
Merci également aux autres contributeurs et bonne continuation à tous !
PatLac
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…