ActiveWorkbook.Close

F

flaneur

Guest
bonsoir.:)

finalisant mon fichier, je viens de mettre un bouton pour quitter,ou je pensais à ActiveWorkbook.Close,ça marche, mais je voudrais eviter le
message 'voulez-vous enregistrer mes modifications apportées à...'
avoir la fermeture immédiate des l'action de cliquer sur le bouton
nommé 'quitter' (le fichier est protégé donc ca ne sert à rien)

merci
 
F

flaneur

Guest
merci Didier !!!

A chaque fois ton aide m'est précieuse merci.

je passe les strates du surfeur novice Excellien, en une semaine,que d'évolution !!!

je viens de télécharger les packs de Thierry Démo, merci à lui et à
Vériland!!!

en fait je lis tellement les messages et démos,que si un un de nos
politicien venait à mourir, je serai incapable de pleurer !! De plus Ma femme grogne...

merci à tous :) :) :)
 

myDearFriend!

XLDnaute Barbatruc
Re flaneur,
Bonsoir Laurent45,

Visiblement, nous n'interprétons pas la question de flaneur de la même manière Laurent, quand flaneur dit : '...avoir la fermeture immédiate des l'action de cliquer sur le bouton nommé 'quitter' (le fichier est protégé donc ca ne sert à rien) ', moi j'en conclus qu'il ne faut pas de sauvegarde...

Cela dit, s'il faut sauvegarder, dans ce cas point besoin de Workbook.save dans l'évènement Workbook_BeforeClose()... Je pense qu'un simple :
ActiveWorkbook.Close SaveChanges:=True
devrait suffire.

Enfin, c'est un avis personnel...

Cordialement,

EDITION
Oups, pardon flaneur, je ne t'avais pas vu revenir si vite. Tant mieux si la solution te convient :)  
Très bon choix les packs de _Thierry Démo ! ;)

Message édité par: myDearFriend!, à: 21/09/2005 22:03
 

myDearFriend!

XLDnaute Barbatruc
Re

Arf, bravo flaneur ! :p

Bon, dans ce cas, vite fait, si tu veux fermer Excel, tu peux essayer ça :
      ThisWorkbook.Saved = True
      Application.Quit
Mais cela n'empêchera pas les messages 'voulez-vous enregistrer...' pour les autres classeurs éventuellement ouverts en parallèle... car dans ce cas, c'est un peu plus compliqué.

Cordialement,
 

Discussions similaires

  • Résolu(e)
XL 2019 VBA
Réponses
18
Affichages
328

Statistiques des forums

Discussions
314 450
Messages
2 109 730
Membres
110 553
dernier inscrit
loic55