Comment afficher de façon temporisée un message d'accueil à l'ouverture d'un classeur ?

1 - Construire un userform avec le message
2 - Dans le module du userfom, utiliser la procédure suivante

Private sub UserForm_Activate()
 ' Récupération de l'heure d'affichage de la BdD
  TimeDebut = Timer
 ' Donne la main à excel pour facilité l'affichage de la BdD
  DoEvents
 ' Boucle tant que 2 secondes ne se sont pas écoulé
  While Timer < TimeDebut + 2
  Wend
 ' Fermeture de la BdD
  Unload Me
 end sub

3 - Créer un procédure qui lance l'affichage de ta userform ( " MaUserForm.Show ")