fermer un fichier sans le sauvegarder

[fred]

bonjour

je voudrais utiliser un code vba pour fermer un fichier sans le sauvegarder,
c'est a dire que je ne veux pas avoir a l'ecran le message windows "voulez vous enregistrer ?"

j'ai essayé ce code mais le message est affiché

Windows("Réfv2_câble de montée.xls").Activate
ActiveWindow.Close

merci pour vos aides

 

[OnErrorResumeNext]

bonjour Fred,

copie ceci dans le module "ThisWorkbook" :

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

amicalement

 

[fred]

merci
c'est parfait