Devi testare il risultato della funzione MsgBox.

Es:

If MsgBox("Vuoi proseguire?", vbYesNo, "PROVA") = vbYes Then
'......
End If


Spero di essere stato d'aiuto!! Fammi sapere...

Ciao!!