Monsieur Excel
Pour tout savoir faire sur Excel !

20 novembre 2008

Création d’un « splash screen »

Un splash screen, c’est un message qui apparaît automatiquement à l’ouverture d’un classeur puis – tous aussi automatiquement – disparaît ensuite après quelques secondes.

Supposons que nous souhaitions afficher le message ci-dessous à l’ouverture d’un classeur, et ce pendant trois secondes. Pour cela, il faut d’abord insérer une UserForm en VBA, puis créer la zone de texte voulue (le message en bleu ci-dessous).

Il ne reste plus qu’à ajouter une macro liée à ThisWorkbook :

Private Sub Workbook_Open()
UserForm1.Show
End Sub

… à créer une macro (cf. image ci-dessus) associée à l’événement Initialize de la UserForm …

… et enfin à créer un module dans lequel on loge la macro suivante :

Sub Fermer()
Unload UserForm1
End Sub

2 Commentaire(s):

  • Super! merci
    une petite série d'instructions qui permet de se passer du "MsgBox".

    By Anonymous Markuus, sur 10:58 AM  

  • Certes, mais au prix quand même de créer un dialogue. C'est plus lourd que le MsgBox, mais on peut en revanche mieux le personnaliser (police, taille, couleur...).

    By Blogger Hervé Thiriez, sur 1:06 PM  

Enregistrer un commentaire

<< Accueil