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

Lancement d'une macro à date donnée

K

KAR_inette

Guest
Bonjour à tous ....
Voila mon problème :
J'ai créé un userform avec un message d'anniversaire sur le fichier d'un collègue.
J'aimerais que ce userform se lance automatiquement à une date precise (le 4 janvier 2004, pour être precise).
Je pense qu'il y a moyen de réaliser ceci ....
Merci d'avance à tous et joyeux Halloween !!!
 
V

vincent

Guest
bonjour

ce code devrait fonctionner

Private Sub Workbook_Open()
If Date = DateValue("4/1/04") Then UserForm1.Show 'change le nom de la userform au cas ou.
End Sub

tu peux le copier coller dans le module thisworkbook.

A plus

@+Vincent

ps: si tu remplace DateValue("4/1/04") par DateValue("4/1") ta userform s'affichera tous les ans le 4 janvier.
 

Discussions similaires

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