VbCritical

- - Dernière réponse : Patrice33740
Messages postés
7828
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
11 octobre 2019
- 7 juil. 2019 à 22:39
Bonjour,

comment rajouter à votre premier code "vbCritical et un point d'interrogation à la fin de la question.
Merci

Configuration: Windows / Firefox 67.0
Afficher la suite 

2 réponses

Messages postés
14786
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
13 octobre 2019
1176
0
Merci
Bonjour,

Pouvez preciser un peu plus??
Commenter la réponse de f894009
0
Merci
Dans la MsgBox rajouter l’icône vbCritical ainsi qu'un point d'interrogation dans ce code : Private Sub Worksheet_BeforeDoubleClick(ByVal sel As Range, Cancel As Boolean)
If vbYes = MsgBox("Voulez-vous supprimer " & sel.Value, vbYesNo, "Suppression matricule") Then
Rows(sel.Row).Delete
End If
End Sub
yg_be
Messages postés
8700
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
14 octobre 2019
433 -
bonjour, moi j'essaierais ainsi:
MsgBox("Voulez-vous supprimer " & sel.Value & " ?", vbYesNo+vbCritical, "Suppression matricule")
réponse : erreur de compilation
yg_be
Messages postés
8700
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
14 octobre 2019
433 > Pat -
le code précédent ne donnait pas d'erreur? peux-tu montrer avant/après?
Patrice33740
Messages postés
7828
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
11 octobre 2019
1215 -
C'est mieux sans les parenthèses :
MsgBox "Voulez-vous supprimer " & sel.Value & " ?", vbYesNo + vbCritical, "Suppression matricule"
Commenter la réponse de Pat