VBA, lecture seul
Fermé
pirate
-
9 août 2018 à 12:19
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 - 10 août 2018 à 00:10
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 - 10 août 2018 à 00:10
2 réponses
rEVOLV3r
Messages postés
223
Date d'inscription
jeudi 12 août 2010
Statut
Membre
Dernière intervention
21 septembre 2022
28
9 août 2018 à 14:39
9 août 2018 à 14:39
Une methode qui n'est pas très très jolie consiste à utiliser cela :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close False
End Sub
Cela aura pour effet de fermer le classeur excel sans demander d'enregistrer le fichier mais cela laissera également une fenêtre excel grise vide.
Il y a surement un meilleur moyen, mais celui-ci fonctionne.
Bonne journée.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close False
End Sub
Cela aura pour effet de fermer le classeur excel sans demander d'enregistrer le fichier mais cela laissera également une fenêtre excel grise vide.
Il y a surement un meilleur moyen, mais celui-ci fonctionne.
Bonne journée.
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 214
10 août 2018 à 00:10
10 août 2018 à 00:10
Bonjour,
un peu tard mais peut-être que ça resservira.
Tu peux te passer de la supervision des modifs.
'Enregistrer sous...', à gauche du Bouton Enregistrer tu as une liste déroulante Outils.
Dans Options générales tu peux choisir un mot de passe pour interdire les modifications plus une case à cocher Lecture seule recommandée.
Dans ton cas il reste le SaveAs et le Close à traiter quand même.
eric
un peu tard mais peut-être que ça resservira.
Tu peux te passer de la supervision des modifs.
'Enregistrer sous...', à gauche du Bouton Enregistrer tu as une liste déroulante Outils.
Dans Options générales tu peux choisir un mot de passe pour interdire les modifications plus une case à cocher Lecture seule recommandée.
Dans ton cas il reste le SaveAs et le Close à traiter quand même.
eric
9 août 2018 à 15:21
J'ai trouve autres choses qui fonctionne super bien.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Me.ReadOnly = True Then
Application.ThisWorkbook.Saved = True 'Informe Excel que le fichier a déjà été enregistré (cela évite d'avoir une demande d'enregistrement à la fermeture)
End If
End Sub