Fermeture sans enregistrer les changements

Simons

XLDnaute Occasionnel

• 15 Juin 2005

• #2

Bonjour Tana,

Voici 2 codes à placer dans Thisworkbook pour
empécher de sauvegarder en cours d'utilisation :

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True
End Sub

Ou alors :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved
End Sub

Qui empéche la sauvegarde à la fermeture de ton fichier.


Salut

 

Vote positif 0 Vote négatif

T

Tana

Guest

• 15 Juin 2005

• #3

Salut,
Je viens d'essayer ce que tu me propose, c'est un échec.

Pour la 1ere, il ne se passe rien, c'est à dire que Excel me demande quand même si je veux ou non enregistrer les changements?!
Pour la 2ème, j'ai un message 'utilisation incorrecte de la propriété'???

What the matter??

 

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

• 15 Juin 2005

• #4

Bonsoir,

place cette macro en VBA dans Thisworkbook:

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close SaveChanges:=False
End Sub

Bon travail

 

Vote positif 0 Vote négatif

T

Tana

Guest

• 16 Juin 2005

• #5

OK, merci ca marche!

A+

 

Vote positif 0 Vote négatif