re,
Soft a raison. Lol je me suis laissé guidé par la deuxième réponse.
Correction donc :
1. dans un nouveau fichier dessiner une zone de texte avec la boite à outils "dessin"
2. mettre cette macro en VBA (ALT + F11) dans THISWORBOOK
Private Sub Workbook_Open()
ActiveSheet.Shapes("Text Box 1").Visible = True
Application.OnTime Now + TimeValue("00:00:05"), "EffacerMessage"
End Sub
3. Toujours en VBA, insérer un module et mette la macro ci-dessous
Sub EffacerMessage()
ActiveSheet.Shapes("Text Box 1").Visible = False
End Sub
4. enregistre le fichier puis ferme le
A l"ouverture la boite sera affichée pendant 5 secondes.
A bientôt
Dan