Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel fermer sans enregistrer

fermer sans enregistrer

3 réponses
Avatar
Vince
Bonsoir a tous,
Je désire bloquer l'enregistrement d'un fichier.
Pour cela, j'ai ecris la macro suivante

Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ("Enregistrement interdit")
ThisWorkbook.Saved = True
End Sub

D'apres l'aide Excel, si on positionne ThisWorkbook.Saved à true,
l'enregistrement n'est pas réalisé. Ce n'est pas le cas. Idem si je
positionne cette variable a false: l'enregistrement est toujours effectué.
Quelle macro puis-je écrire ?


Merci
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
ru-th
Salut

fais plutot (pas le chien)
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ("Enregistrement interdit")
cancel = true
End Sub
et dans
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
end sub
-
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"Vince" a écrit dans le message de news:

Bonsoir a tous,
Je désire bloquer l'enregistrement d'un fichier.
Pour cela, j'ai ecris la macro suivante

Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ("Enregistrement interdit")
ThisWorkbook.Saved = True
End Sub

D'apres l'aide Excel, si on positionne ThisWorkbook.Saved à true,
l'enregistrement n'est pas réalisé. Ce n'est pas le cas. Idem si je
positionne cette variable a false: l'enregistrement est toujours effectué.
Quelle macro puis-je écrire ?


Merci




Avatar
Vince
Merci ! ouaf (pardon)

"ru-th" a écrit dans le message de news:

Salut

fais plutot (pas le chien)
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ("Enregistrement interdit")
cancel = true
End Sub
et dans
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
end sub
-
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"Vince" a écrit dans le message de news:

Bonsoir a tous,
Je désire bloquer l'enregistrement d'un fichier.
Pour cela, j'ai ecris la macro suivante

Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox ("Enregistrement interdit")
ThisWorkbook.Saved = True
End Sub

D'apres l'aide Excel, si on positionne ThisWorkbook.Saved à true,
l'enregistrement n'est pas réalisé. Ce n'est pas le cas. Idem si je
positionne cette variable a false: l'enregistrement est toujours
effectué.


Quelle macro puis-je écrire ?


Merci








Avatar
Clément Marcotte
Tu aurais du mettre meuhrci :-)


"Vince" a écrit dans le message de
news:
Merci ! ouaf (pardon)

"ru-th" a écrit dans le message de news:

Salut

fais plutot (pas le chien)
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)


MsgBox ("Enregistrement interdit")
cancel = true
End Sub
et dans
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
end sub
-
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"Vince" a écrit dans le message de
news:



Bonsoir a tous,
Je désire bloquer l'enregistrement d'un fichier.
Pour cela, j'ai ecris la macro suivante

Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)



MsgBox ("Enregistrement interdit")
ThisWorkbook.Saved = True
End Sub

D'apres l'aide Excel, si on positionne ThisWorkbook.Saved à
true,



l'enregistrement n'est pas réalisé. Ce n'est pas le cas. Idem si
je



positionne cette variable a false: l'enregistrement est toujours
effectué.


Quelle macro puis-je écrire ?


Merci