Message à la fermeture du fichier si lecture seule

Gil_Se · 6 Octobre 2012

Bonjour à tous.
Je cherche et je ne trouve pas pas:
Je souhaite, si mon fichier excel a été ouvert en lecture seule, supprimer le message "Voulez vous enregistrer les modifications apportées à..." à la fermeture de celui-ci. (Il est logique que ce message s'affiche car mon fichier contient des liaisons).
Bien sur, si le mot de passe a été saisi à l'ouverture du fichier pour modifier des données, le message doit apparaitre.
D'avance, merci de votre aide.
Gilles

Gelinotte · 6 Octobre 2012

Re : Message à la fermeture du fichier si lecture seule

Bonjour,

À inscrire dans ThisWorkbook (en VBE)

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   If ThisWorkbook.ReadOnly = True Then ThisWorkbook.Close False
End Sub

G

Gil_Se · 7 Octobre 2012

Re : Message à la fermeture du fichier si lecture seule

Bonjour et merci de ta réponse efficace.
Bonne journée.
Gilles

Gelinotte · 7 Octobre 2012

Re : Message à la fermeture du fichier si lecture seule

Bonjour,

Bienvenue

G

Message à la fermeture du fichier si lecture seule

Gil_Se

XLDnaute Occasionnel

Gelinotte

XLDnaute Accro

Gil_Se

XLDnaute Occasionnel

Gelinotte

XLDnaute Accro

Discussions similaires