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