Comment fermer excel sans enregistrer. [Résolu]

cs_wyzern 12 Messages postés dimanche 5 mars 2006Date d'inscription 13 avril 2008 Dernière intervention - 15 mars 2008 à 14:13 - Dernière réponse : cs_wyzern 12 Messages postés dimanche 5 mars 2006Date d'inscription 13 avril 2008 Dernière intervention
- 15 mars 2008 à 14:52
Bonjour, je désire via VB6 fermer un classeur excel mais sans l'enregistrer.
Si j'utilise la fonction Classeur.close j'ai toujours le message d'alerte excel " voulez vous enregistrer...."
Que dois-je rajouter à cette fonction ou quelle fonction dois-je utilisé.
Par pitié je suis vraiment novice alors pas trop compliqué SVP...
Merci d'avance.
Afficher la suite 

3 réponses

Répondre au sujet
cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention - 15 mars 2008 à 14:26
+3
Utile
avant de le fermer tu dois mettre la propriété Saved de ton classeur à True.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de cs_casy
cs_wyzern 12 Messages postés dimanche 5 mars 2006Date d'inscription 13 avril 2008 Dernière intervention - 15 mars 2008 à 14:52
+3
Utile
Merci de ton aide, j'ai enfin trouvé il faut que je rajoute à ma fonction ceci :
classeur.close SaveChanges:=False
Fallait il encore le savoir
en tout cas un grand merci
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de cs_wyzern
cs_akzo 133 Messages postés dimanche 23 juin 2002Date d'inscription 3 janvier 2015 Dernière intervention - 15 mars 2008 à 14:26
0
Utile
salut a toi essaye ceci pour voir j'avais trouver ceci sur le net il y a un petit moment mais je sais pas si cela fonctionne
Pour ouvrir excel ,selectionne le classeur puis la feuille
'  Déclaration des variables
Dim appExcel As Excel.Application     '   Application Excel
Dim wbExcel As Excel.Workbook      '   Classeur Excel
Dim wsExcel As Excel.Worksheet       '   Feuille Excel

'  Ouverture de l'application
Set appExcel = CreateObject("Excel.Application")
'  Ajout d'un classeur
appExcel.Workbooks.Add   
' Récupération du classeur par défaut
Set wbExcel = appExcel.ActiveWorkbook
' Récupération de la feuille par défaut
Set wsExcel = wbExcel.ActiveSheet
Pour la fermeture

wbExcel.Close     ' Fermeture du classeur Excel
appExcel.Quit      ' Fermeture de l'application Excel

'  Vidage des mémoires
Set wsExcel = Nothing
Set wbExcel = Nothing
Set appExcel = Nothing
Commenter la réponse de cs_akzo

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.