Macro et Activer actualisation automatique à l'ouverture

Bonjour!

J'ai besoin de votre aide! Je vous explique.

J'ai 1 fichier excel(1) qui avec une macro qui ouvre un autre fichier(2) excel dans lequel des données du jour doivent être traitées.

Le fichier que je désire ouvrir (2) contient une requete automatique. Donc, à l'ouverture, je dois activer l'Actualisation automatique à l'aide du bouton de la fenêtre pop-up à cet effet.

Le problème est: Ma macro s'exécute et ne me permet pas de peser sur le bouton et mes données ne sont pas a jour ainsi ma macro ne sert à rien..

L'idée d'ouvrir manuellement le fichier avant est la solution que j'Ai trouvé mais lorsque qu'il faut en ouvrir plusieurs c plutot tannant...

Svp éclairer moi!

Merci!

Guillaume

-- 20 Avr 2011, 13:20 --

Je clarifie!

Voici les étapes que je veux que ma macro exécute:

1) Ouvre le fichier (2)

2) Active l'actualisation automatique

3) Attende que l'actualisation soit terminée

4) Exécute le restant du script (Traitement des données)

En gros, il me manque les étapes 2) et 3)...

Voila, Merci encore!!

-- 20 Avr 2011, 16:46 --

J'ai trouvé comme un grand! Merci tout de même!

Bonjour Guillaume,

Je rencontre exactement la même situation que tu as eu. Qu'avais-tu utilisé comme code pour effectuer tes étapes 2 et 3?

ça pourrait m'être d'une grande aide

Merci d'avance.

Benjamin

Je ne sais pas s'il est trop tard mais voici la façon dont j'ai réglé mon problèmes:

Je me suis créer une macro "Global", Dans cette macro j'exécute la macro "ouverture de fichier" en premier;

Sub La_Total()

Application.Run ("Ouverture_fichier")
Application.Run ("Tri")

Pour mon ouverture de fichier voici le code:

   ThisWorkbook.Activate
    Sheets("MAJ").Activate
    Chemin = Cells(19, 1).Value

'Ouverture Fichier 1.xls
    ThisWorkbook.Activate
    Fichier = Cells(21, 1).Value
    Workbooks.Open Filename:=Chemin & Fichier
    Workbooks("Fichier 1.xls").Activate
    Sheets("Tri").Select
    Range("A9:P150").Select
    Selection.QueryTable.Refresh BackgroundQuery:=False

par la suite, la macro tri s'exécute; de cette façon, la macro Global effectue les actions une après l'autre.