Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Quitter sans sauvegarder

Christophe

XLDnaute Occasionnel
Bonjour le Forum et ses fidèles,

J'utilise une macro qui ouvre un grand nombre de fichiers pour en compiler les données dans un fichier central. Tout fonctionne à merveille sauf que je ne sais pas automatiser le fait de quitter un fichier sans le sauvegarder ni conserver les données copiées, ce qui fait que je suis obligé de cliquer à chaque fois sur les boîtes de dialogue qui s'affichent. Ni pratique, ni efficace.

C'est sans doute très basique comme question, mais il me semble difficile d'inventer la réponse !

Merci donc par avance de votre coup de mains.

Bonne fin de journée.


Christophe
 
T

Tenormadness

Guest
Bonjour,
lorsque tu fais

workbooks(StrNomDuClasseurOuvert).close false

ferme le fichier ouvert en import sans sauvegarder
gain de temps

Tchaoowww

AVEHEUGOUDEDAI - Tenormadness
 

2passage

XLDnaute Impliqué
Bonjour,

a chaque fois, je suis obligé de rechercher la syntaxe exacte... setwarning ? non... showWarning.... non .... ah Voilà... l'avantage c'est que je n ai plus qu'un copier coller de l'aide à faire :silly:

DisplayAlerts, propriété - Exemples

Cet exemple montre comment fermer le classeur Book1.xls sans inviter l'utilisateur à enregistrer les modifications. Les modifications apportées à Book1.xls ne sont pas enregistrées.

Application.DisplayAlerts = False
Workbooks('BOOK1.XLS').Close
Application.DisplayAlerts = True

A+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…