C'est faisable, mais tu risque de devoir réécrire.
On ne bloque pas l’exécution du code.
Dans un module de classe, tu peux déclarer :
Private WithEvents oWord As Word.Application
ce qui te permet d'utiliser les évenements de word genre :
Private Sub oWord_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean)
End Sub