Lancer macro à partir d'un code

[guenfood]

Bonjour,

Je souhaite qu'une macro soit exécuter après un clic sur le bouton 'OK' dans une msgbox.

Le code est le suivant, mais que dois-je mettre après 'THEN', pour lance ma macro ?

Merci par avance.

Sub TraitementEtatBatchMiz19()
Dim Msg, Style, Title, Response
Msg = 'Veuillez lancer l'extraction de l'etat MIZ19 sous codex puis cliquez sur OK'
Style = vbOK + vbQuestion
Title = 'Traitement de l'état batch MIZ19'
Response = MsgBox(Msg, Style, Title)
If Response = vbOK Then
        
End If
End Sub

 

[PascalXLD]

Bonjour

Juste le nom de ta macro

Par contre d'un autre coté vu que tu n'as que le bouton OK elle se lancera sans le test du vbok

Message édité par: Pascal76, à: 28/11/2005 14:35