Interdire d'enregistrer ?

[ljoue]

Bonjour à tous,

Est-il possible d'interdire l'enregistrement d'un fichier Excel et de seulement autoriser un 'Enregistrer Sous'

Je demande cela pour que l'utilisateur final du programme ne puisse jamais modifier la version originale, mais seulement le mettre à jour chaque mois en effectuant un 'enregistrer sous' de sorte à avoir un fichier unique pour chaque mois.

Merci d'avance !

Cordialement,
Laurent

 

[PascalXLD]

Bonjour

Tu peux essayer ce code pour obliger l'utilisateur à passer par le enregistrer sous

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI <> True Then Cancel = True
End Sub

Par contre si il enregistre sous le même nom cela ecrasera tout de même

 

[ljoue]

Salut Pascal

Merci beaucoup pour ta réponse dans un délais...!!! :woohoo:

Je suppose qu'il faut que j'intègre ce code Vba dans 'ThisWorkbook'

Merci encore

@+
Laurent

 

[PascalXLD]

Oui tout à fait dans thisworkbook j'avais oublié de préciser mais tu avais bien compris

@ +