Discussion :

[Titouf]

Bonjour,

Voici mon problème :
J'ai une macro dans un fichier EXCEL qui balaie l'ensemble des fichiers contenus dans un répertoire/sousrepertoires.

Elle ouvre les fichiers, et les referme en sauvegardant. Une macro sur chaque fichier se déclenche en beforeclose. Seulement, une question est posée dans cette macro beforeclose, à laquelle je dois répondre OUI. Et je ne sais pas quelle est la méthode à employer.

Pourriez-vous m'aider sur ce sujet?

Je vous en remercie par avance.

Bonne Soirée.

[laetitia]

bonsoir Titouf le forum c'est quoi la question. peut t'on sans passer??

OUI je veus sauvegarder par exemple ou autres??? il faut en dire plus comme cela pas simple

[ESVBA]

Avec l'aide de ma boule de cristal,

j'en conclut que la macro ouvre d'autres fichiers Excel pour les modifier et qu'en les fermant un message demande s'il faut enregistrer le fichier excel modifié.


En envoyant au classeur modifié (et activé), une touche type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendKeys {ENTER}

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendKeys "O"

C'est fonction du message.

ESVBA

[Titouf]

En effet, vous avez raison, ce n'était pas suffisamment précis.

Mon fichier Excel ouvre un autre fichier EXCEL où il y a une macro qui doit être exécutée. Cette macro est en beforeclose.
Donc je me contente de fermer (avec sauvegarde) le fichier EXCEL, afin que cette macro s'exécute.

Dans cette macro, l'utilisateur a codé une question "Souhaitez-vous rafraichir les montants?"
Et là nous avons une popup qui s'affiche avec OUI/NON.

Lorsque je fais du pas à pas, je n'ai plus la main... et je reste bloquer sur le close. Dans l'autre fichier, s'ouvre la popup et est en attente d'une réponse.

voilà, est ce plus clair?

En fait j'ai essayé la commande

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendKeys {ENTER}

Je l'ai positionnée juste dans la macro du fichier 1 après le close du fichier 2. La macro BeforeClose du fichier 2 se déclenche. Mais je n'ai plus la main dans le fichier 1, et il ne va donc pas sur la commande suivante qui est le sendkeys.

Si vous avez des idées, je suis toujours preneur.

Merci encore

[ESVBA]

bonsoirs à tous

dans la boucle sur le classeur ouvrant les autres :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
debut boucle:
'ouverture des fichiers
'...
DoEvents
'...
'fermeture
Workbooks("nomfichierMODIFIE_ou_LU").activate
'ICI commande fermeture de la fenêtre du fichier nomfichierMODIFIE_ou_LU
DoEvents
sendKeys "{ENTER}"
DoEvents
Workbooks("nomfichierAPPELANT").activate
'instruction fin de boucle

Sinon il y a la possibilité dans tous les fichiers que l'on ferme après lecture de tester dans "beforeclose" si le fichier récaptulatif est ouvert et si oui de sauter la confirmation.

ESVBA