Blocage de l'enregistrement

Un grand bonjour à tout le forum.

Un classeur est mis à disposition sur un réseau. pour empecher qu'il soit modifier je bloque par VBA l'enregistrement..........

J'ai tapé ce code VBA dans : ThisWorkbook.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ('Sauvegarde non autorisée.')
Cancel = True
End Sub

Problème je ne peux plus sauvegarder mon propre classeur...le chien se mord la queue!!!!


Comment en sortir...............un grand merci à tous