E' possibile fermare una macro in elaborazione e poi farla ripartire?

[gia2005]

Ok torn, tutto ok, ora funziona, mi ha fatto impazzire un pò ma sono riuscito a trovare dove era l'errore.
Sbagliavo nella condizione if nidificata
prima era così e il tutto funzionava:
If var3>0 Then
response=MsgBox ("CONTINUARE IL LAVORO?" , 1 , "ATTENZIONE" )
If response =1 Then GoTo 6 Else exit sub

End If

Poi mi serviva un'altra azione in più e quando modificavo queste righe di codice nella seconda condizione IF tralasciavo un end if come riportato sotto.

If var3>0 Then
response=MsgBox ("CONTINUARE IL LAVORO?" , 1 , "ATTENZIONE" )
If response =1 Then
GoTo 6
Else
SetVar(1000, 0)
exit sub
End If
Un errore banale ma non riuscivo a vederlo anche perch'è questo compilatore non me lo indicava bene.
Grazie di nuovo ed alla prossima richiesta di aiuto