By pass Message Excel.

6 réponses
Avatar
Al
Bonjour,



J'ai 2 fichiers EXCEL ouverts.

Avec ma macro, je récupère des données de l'un pour copier dans l'autre.

Quand je fais cette copie, je modifie intentionnellement le contenu du
fichier Excel dans lequel je récupère mes données.

Je veux à la fin du traitement fermer ce fichier à l'aide de
Workbooks(ActiveWorkbook.Name).Close.



Excel voyant que le fichier a été modifié, me demande si je veux sauvegarder
mes modifications.

Je ne veux pas les sauvegarder et je voudrais ne pas avoir à cliquer sur
"Non", donc faire en sorte que la fenêtre n'apparaisse pas.



Pouvez-vous m'aider ?



Merci pour votre aide à tous

Al

6 réponses

Avatar
DanielCo
Bonjour,

Workbooks(ActiveWorkbook.Name).Close False

Cordialement.
Daniel

Bonjour,



J'ai 2 fichiers EXCEL ouverts.

Avec ma macro, je récupère des données de l'un pour copier dans l'autre.

Quand je fais cette copie, je modifie intentionnellement le contenu du
fichier Excel dans lequel je récupère mes données.

Je veux à la fin du traitement fermer ce fichier à l'aide de
Workbooks(ActiveWorkbook.Name).Close.



Excel voyant que le fichier a été modifié, me demande si je veux sauvegarder
mes modifications.

Je ne veux pas les sauvegarder et je voudrais ne pas avoir à cliquer sur
"Non", donc faire en sorte que la fenêtre n'apparaisse pas.



Pouvez-vous m'aider ?



Merci pour votre aide à tous

Al
Avatar
MichD
Bonjour,

Il y a une autre ligne de code qui fait la même chose :
Workbooks(ActiveWorkbook.Name).Saved = True
Avatar
MichD
Évidemment, cette ligne de code doit précéder l'autre...

With Workbooks(ActiveWorkbook.Name)
.Saved = True
.Close
End With
Avatar
DanielCo
PS. Tu peux avantageusement remplacer :

Workbooks(ActiveWorkbook.Name)

par :

ActiveWorkbook :

ActiveWorkBook.Close False

Daniel


Bonjour,

Workbooks(ActiveWorkbook.Name).Close False

Cordialement.
Daniel

Bonjour,



J'ai 2 fichiers EXCEL ouverts.

Avec ma macro, je récupère des données de l'un pour copier dans l'autre.

Quand je fais cette copie, je modifie intentionnellement le contenu du
fichier Excel dans lequel je récupère mes données.

Je veux à la fin du traitement fermer ce fichier à l'aide de
Workbooks(ActiveWorkbook.Name).Close.



Excel voyant que le fichier a été modifié, me demande si je veux
sauvegarder mes modifications.

Je ne veux pas les sauvegarder et je voudrais ne pas avoir à cliquer sur
"Non", donc faire en sorte que la fenêtre n'apparaisse pas.



Pouvez-vous m'aider ?



Merci pour votre aide à tous

Al
Avatar
Al
Merci MichD pour toutes ces réponses...

"MichD" a écrit dans le message de
news:lpttnl$i9a$
Évidemment, cette ligne de code doit précéder l'autre...

With Workbooks(ActiveWorkbook.Name)
.Saved = True
.Close
End With
Avatar
Al
et Merci à DanielCo...

"Al" a écrit dans le message de
news:53c26906$0$2004$
Bonjour,



J'ai 2 fichiers EXCEL ouverts.

Avec ma macro, je récupère des données de l'un pour copier dans l'autre.

Quand je fais cette copie, je modifie intentionnellement le contenu du
fichier Excel dans lequel je récupère mes données.

Je veux à la fin du traitement fermer ce fichier à l'aide de
Workbooks(ActiveWorkbook.Name).Close.



Excel voyant que le fichier a été modifié, me demande si je veux
sauvegarder mes modifications.

Je ne veux pas les sauvegarder et je voudrais ne pas avoir à cliquer sur
"Non", donc faire en sorte que la fenêtre n'apparaisse pas.



Pouvez-vous m'aider ?



Merci pour votre aide à tous

Al