format d'un MsgBox

Bonjour le forum,
Je cherche comment mettre en forme un MsgBox ( au format très basique )à la fermeture de mon classeur Excel,mais selon de nombreux forums cela est impossible à priori.Parcontre,il existe une alternative :il s'agit de mettre un userform.show à la fermeture de ce classeur (je pourrais agrémenter mon userform -qui fait office de msgbox-autant que je le souhaite).Jusquelà c'est ok...mais je voudrais pouvoir fermer mon classeur sans être obligé de cliquer sur la croix rouge de l'userform.Par exemple un userform qui disparait en 2 secondes.

Merci d'avance
PS: Je reste ouvert à toute proposition,notament si vous avez une idée sur la mise en forme d'un MsgBox.

Bonjour,

Pour afficher un Userform durant 2 secondes à la fermeture du classeur, tu peux procéder comme ceci :

Code:

---

1 2 3 4

Private Sub Workbook_BeforeClose(Cancel As Boolean) UserForm1.Show 0 Application.Wait Now + TimeValue("00:00:02") End Sub

---

Tu peux aussi afficher une simple Msgbox durant 2 secondes

Code:

---

1 2 3

Private Sub Workbook_BeforeClose(Cancel As Boolean) CreateObject("Wscript.shell").Popup "Texte de la Msgbox", 2, "Titre de la Msgbox" End Sub

---

Re-Bonjour le forum,
Merci pour la réponse ...J'ai testé et c'est formidable:ccool: