fermer une page sans enregistrer

David · 26 Mars 2006

Bonjour le forum

je voudrais fermer une page sans engistrement
et sans le message ('voulez vous enregistrer....ect')

je connait la formule pour engistrer
Windows('David.xls').Activate
ActiveWorkbook.Save
ActiveWindow.Close

mais je n'arrive pas 'no save' :silly:

merci d'avance
david @+

Blunet · 26 Mars 2006

Salut David,
2 méthodes :
- utiliser un code propre

Sub FermerSansEnregistrer()
Workbooks('Classeur2.xls').Close SaveChanges:=False
End Sub

- utiliser la procédure événementielle avant fermeture

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Workbooks('Classeur2.xls').Close SaveChanges:=False
End Sub

Ciao

Climaudo · 26 Mars 2006

Bonjour David, le forum

Dans l'événement _Beforeclose du workbook,

activeworkbook.saved = true
activeworkbook.close

Il considérera que ton classeur a déjà été enregistré.

Bonne journée

Oups, j'avais pas rafraichi
bonjour Blunet

Message édité par: climaudo, à: 26/03/2006 14:38

Message édité par: climaudo, à: 26/03/2006 14:38

fermer une page sans enregistrer

David

Guest

Blunet

XLDnaute Occasionnel

Climaudo

XLDnaute Occasionnel

Discussions similaires