Boite de dialogue dans Macro Word

Pomme -  
 Jean-Marie -
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

1 réponse

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

    par

    If OuiNon = vbYes Then
    traitement
    Exit Sub

    a+
    0