MsgBox en couleur

[La Vouivre]

Bonsoir à tous

Je débute en VBA et comme vous faite un super forum je viens vous demander de l’aide .
Est –il possible de modifier la couleur d’un MsgBox ?
Si oui quel est le code à appliquer ?
Merci pour votre aide

 

[Staple1600]

Re : MsgBox en couleur

Bonjour


Oui mais c'est une sacrée aventure

(qui flirte avec le langage HTML ect ...)

 

[Evelynetfrancois]

Re : MsgBox en couleur

Bonsoir La Vouivre, Staple1600
avec un USERFORM c est bien plus abordable .......essaye
E et F

 

[ftho]

Re : MsgBox en couleur

Bonsoir tlm,

Une autre alternative est de jouer avec des images personnalisées 🙂

TEST ICI

 

[La Vouivre]

Re : MsgBox en couleur

Merci pour vos reponces


Ftho ton fichier est tres intéressant ,mais ou est stoque l'image ?

 

[ftho]

Re : MsgBox en couleur

L'image est simplement insérée sur la feuille avec une taille hauteur/largeur = 0/0. Ensuite, dans le code, au lieu d'afficher une MsgBox, on affiche l'image en lui redonnant ses dimensions originales.

J'ai ajouter un facteur "temps" qui permet de réduire à nouveau l'image au bout de quelques secondes

 

[Spitnolan08]

Re : MsgBox en couleur

Bonsoir le fil,

mais ou est stoque l'image ?

Pour la trouver modifie :

Sub Info_Off()
ActiveSheet.Shapes("Picture 1").Select
Selection.ShapeRange.Height = 100#
Selection.ShapeRange.Width = 100#
SendKeys "{ESC}"
End Sub

Cordialement

Edit : Désolé ftho, pas vu...

 

[La Vouivre]

Re : MsgBox en couleur

Merci à tous
c'est une super trouvaille , je vais m'amuser à placer ce petit programe pour protéger les données de mes fichiers.
encore merci à tous
bonne soirée