Fermer msgbox avec croix
Résolu/Fermé
peybernes
Messages postés
55
Date d'inscription
jeudi 12 janvier 2017
Statut
Membre
Dernière intervention
29 juillet 2020
-
30 août 2017 à 16:32
peybernes Messages postés 55 Date d'inscription jeudi 12 janvier 2017 Statut Membre Dernière intervention 29 juillet 2020 - 7 sept. 2017 à 17:12
peybernes Messages postés 55 Date d'inscription jeudi 12 janvier 2017 Statut Membre Dernière intervention 29 juillet 2020 - 7 sept. 2017 à 17:12
A voir également:
- Fermer msgbox avec croix
- Signification rectangle avec croix dedans ✓ - Forum Twitter
- Fermer compte paypal - Guide
- Fermer compte outlook - Guide
- Croix chretienne copier coller ✓ - Forum Clavier
- Fermer un compte gmail - Guide
4 réponses
Bonjour Peybernes,
Je te propose ce code VBA :
Cordialement
Je te propose ce code VBA :
If MsgBox("Êtes-vous sûr de vouloir supprimer les saisies ?", vbYesNo, _
"Demande de confirmation") = vbYes Then
[A1:D10].ClearContents: Exit Sub
End If
Cordialement
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
30 août 2017 à 17:35
30 août 2017 à 17:35
Bonjour,
il a déjà eu la réponse ici:
https://forums.commentcamarche.net/forum/affich-34385164-quitter-une-macro-avec-la-croix-rouge
il a déjà eu la réponse ici:
https://forums.commentcamarche.net/forum/affich-34385164-quitter-une-macro-avec-la-croix-rouge
Bonjour, cs_Le Pivert,
J'ai suivi ton lien ; c'est bien une conversation similaire, mais :
a) La boîte de dialogue affiche une autre question
b) Les boutons sont : vbYesNoCancel + vbCritical + vbDefaultButton2
alors qu'ici, c'est simplement : vbYesNo
c) La partie de code ci-dessous ne contient pas Exit Sub :
Else
'Traitement de la réponse ANNULER ou fermeture par la CROIX
End If
C'est pourquoi ma réponse de 17:35 reste valable :
https://forums.commentcamarche.net/forum/affich-34832298-fermer-msgbox-avec-croix#6
Cordialement
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
>
greg
30 août 2017 à 18:03
30 août 2017 à 18:03
Dans ta MsgBox la croix de fermeture est masquée!
Alors que dans le lien que j'ai indiqué elle est présente
D'où le titre de ce post:
Fermer msgbox avec croix
Cdlt
Alors que dans le lien que j'ai indiqué elle est présente
D'où le titre de ce post:
Fermer msgbox avec croix
Cdlt
greg
>
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
30 août 2017 à 19:41
30 août 2017 à 19:41
Ah oui, tu as raison ! j'avais pas vu que la croix est non cliquable ;
pour qu'elle soit cliquable, il faut remplacer dans mon précédent
code VBA : vbYesNo par vbYesNoCancel ; ce qui donne :
Sub Essai()
If MsgBox("Êtes-vous sûr de vouloir supprimer les saisies ?", _
vbYesNoCancel, "Demande de confirmation") = vbYes Then
[A1:D10].ClearContents: Exit Sub
End If
End Sub
Merci pour tes infos ! :)
peybernes
Messages postés
55
Date d'inscription
jeudi 12 janvier 2017
Statut
Membre
Dernière intervention
29 juillet 2020
Modifié le 7 sept. 2017 à 17:13
Modifié le 7 sept. 2017 à 17:13
Merci beaucoup pour votre aide !
f894009
Messages postés
17222
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
8 janvier 2025
1 712
Modifié le 30 août 2017 à 16:58
Modifié le 30 août 2017 à 16:58
Bonjour,
j'appelle une boite dialogue
Quelle boite, dans le titre vous ecrivez msgbox ?????
j'appelle une boite dialogue
Quelle boite, dans le titre vous ecrivez msgbox ?????
peybernes
Messages postés
55
Date d'inscription
jeudi 12 janvier 2017
Statut
Membre
Dernière intervention
29 juillet 2020
30 août 2017 à 17:10
30 août 2017 à 17:10
Bonjour !
Ma macro est la suivante :
"If MsgBox("Êtes-vous sûr de vouloir supprimer les saisies?", vbYesNo, _"Demande de confirmation") = vbYes Then
Range("A1:D10").Select
Selection.ClearContents "
Je voudrais donc pouvoir fermer la fenêtre qui s'affiche lorsque je lance ma macro grâce à la croix.
Avez-vous une idée ?
Merci
Ma macro est la suivante :
"If MsgBox("Êtes-vous sûr de vouloir supprimer les saisies?", vbYesNo, _"Demande de confirmation") = vbYes Then
Range("A1:D10").Select
Selection.ClearContents "
Je voudrais donc pouvoir fermer la fenêtre qui s'affiche lorsque je lance ma macro grâce à la croix.
Avez-vous une idée ?
Merci
f894009
Messages postés
17222
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
8 janvier 2025
1 712
30 août 2017 à 17:27
30 août 2017 à 17:27
Re,
Je voudrais donc pouvoir fermer la fenêtre qui s'affiche lorsque je lance ma macro grâce à la croix.
Quelle fenetre et quelle croix, car msgbox yesno pas de croix de fermeture ?????
Je voudrais donc pouvoir fermer la fenêtre qui s'affiche lorsque je lance ma macro grâce à la croix.
Quelle fenetre et quelle croix, car msgbox yesno pas de croix de fermeture ?????