Bonjour a tous, forum bonjour,

Le code ci-dessous fonctionne bien
la boite s'ouvre affiche mon message et s'efface automatiquement au bout de 12 secondes

Je souhaiterais svp ajouter sous le message "Fin du listing" le décompte des 12 secondes

j'ai vu des codes sur le net mais ils ne fonctionne pas

Merci pour votre aide et bon W-end a tous.

Cdlt Ray

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Sub MsgBox_01()
CreateObject("Wscript.Shell").Popup "Fin du listing", 12, "Message d'information", vbInformation
End Sub