Discussion :

[huître]

bonjour je voudrais lancer un msgbox qui confirme ou infirme l'execution d'une macro
donc voila le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub avertissement()
Dim reponse As Integer
msgbox "voulez vous continuer", vbQuestion + vbYesNo, "confirmation"
If reponse = vbYes Then
Call etapefin
End If
End Sub

hormis le message d'erreur qui s'affiche sans problème la macro ne s'execute pas

pouvez vous me debloquer ce probleme
voila merci d'avance

[Invité]

Bonjour

Tu n'affectes pas le résultat de la MsgBox à ta variable, il faut faire comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

reponse = MsgBox("voulez vous continuer", vbQuestion + vbYesNo, "confirmation")

Philippe

[OrDonc]

Bonjour,

tu peux aussi essayer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Sub avertissement()
  If MsgBox("voulez vous continuer", vbQuestion + vbYesNo, "confirmation") = vbNo Then Exit Sub
  Call etapefin
End Sub

[huître]

salut

merci pour l'astuce

ca marche nickel

merci