Boite de dialogue dans Macro Word

Fermé
Pomme - 3 août 2010 à 15:16
 Jean-Marie - 3 août 2010 à 15:40
Bonjour,



J'aimerais faire une boite de dialogue oui/non pour une macro word, la macro est déjà opérationnel.
J'ai donc une macro "traitement" et une autre macro "question" qui est sensée lancer "traitement" si je réponds oui.
Ma boite de dialogue s'affiche, cependant, lorsque je réponds "oui", mon autre macro ne se lance pas.
C'est ma fonction d'appel de macro qui ne fonctionne pas en fait , voilà ce que j'ai fais :

Private Sub question()
Dim OuiNon As Integer

On Error GoTo question

OuiNon = MsgBox("Are you sure to delete all test status ?", vbYesNo)
If OuiNon = vbYes Then
stDocName = "traitement"
DoCmd.RunMacro stDocName
Exit Sub
Else
Exit Sub
End If

Exit_question:
Exit Sub

Err_question:
MsgBox Err.Description
Resume Exit_question

End Sub


Merci beaucoup si vous avez des idées
A voir également:

1 réponse

Salut,
remplace
If OuiNon = vbYes Then
stDocName = "traitement"
DoCmd.RunMacro stDocName
Exit Sub

par

If OuiNon = vbYes Then
traitement
Exit Sub

a+
0