• Initiateur de la discussion Initiateur de la discussion jmcr
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jmcr

XLDnaute Occasionnel
bonjour le forum
voila ma question j 'ai un useforme qui marche très bien sais pas la le problème ,non il s'agit du msgbox j'ai trois de ses messages diffèrent mais que je trouve vraiment triste j ai cette formule qui marche
Private Sub btn_fermeture_Click()
Dim reponse As Integer
reponse = MsgBox("Attention, avez-vous validé les dernières les modifications ? Voulez-vous fermer ?", 52, " Fermeture sans validation")
If reponse = 7 Then 'non=7 oui=6
Exit Sub
Else
Unload Me
End If
End Sub
je recherche à le remplacé par chose plus agréable à œil peut être un textbox useforme ou je pourrais changées sa couleur d'écritures et essayées de mettre un icône mais quelle serais la procédure à faire?????? eT par quoi t je dois remplacées mon code
avec tout mes remercîment pour votre aide
 
Re,

Si tu utilises déjà une UserForm tu connais le code pour l'afficher non !?...

VB:
Private Sub btn_fermeture_Click()
Me.Hide
UserForm2.Show
End Sub
Ensuite tu agis en fonction des boutons Oui et Non sur la seconde userForm. Pour finir, tu fermes les deux userForms...
 
Désolé Robert mon père avait déjà posé la question sur un autre forum tout mes excuses pour le dérangement effectivement mais pour le code msgbox je l' efface ou pas useforme avertissements est prêt donc je me ton code à la place merci pour ton aide
 
Dernière édition:
bonsoir le forum
voila mon useforme est finis prêt pour le changement je voulais vous demandée s'il faut que j 'efface mon msgbox pour mettre ma macro de l'useforme avec le code que ma données ROBERT
merci pour votre aide
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
1 K
B
Réponses
6
Affichages
1 K
D
Réponses
1
Affichages
979
Dudesson
D
Réponses
3
Affichages
1 K
M
Réponses
11
Affichages
2 K
Melidan2006
M
Réponses
2
Affichages
945
M
Réponses
20
Affichages
3 K
massol
M
Retour