ouverture automatique de plusieurs classeurs

[lucdes]

Bonjour à toutes et à tous
J'utilise excel 2003, et j'ai un classeur qui se met à jour avec des données de plusieurs autres classeurs et qui eux mêmes, vont piocher dans des classeurs de saisie.
Pour que les données soient fiables en bout de chaine, il faut mettre à jour tous les classeurs intermédiaires en faisant une ouvertue, accepter la mise à jour et fermer en enregistrant.
Existe-il une procédure automatique pour faire l'action des classeurs intermédiaires ???
par avance merci beaucoup pour ce coup de main
lucdes

 

[wazzebu]

Re : ouverture automatique de plusieurs classeurs

Bonjour,

avec une macro tu peux ouvrir les classeurs (les uns apres les autres), accepter la mise à jour ? (a voir), et fermer en enregistrant.

Pour ouvrir un classeur
ChDir "T:\..." 'dossier
Workbooks.Open Filename:= _
"T:\........\....xls" 'nom du classeur

Pour fermer le classeur ouvert en enregistrant
ActiveWindow.Close True

En espérant que j'ai bien compris le pb 😀

Sinon un petit fichier exemple ne fait pas de mal !!!

@+

Wazzebu

 

[yoyo69]

Re : ouverture automatique de plusieurs classeurs

bonjour lucdes, wazzebu

Wazzebu, comment completer le code pour que le dossier01 de données reste en arriere plan, à l'ouverture du dossier02 qui contient la macro

ChDir "T:\..." 'dossier
Workbooks.Open Filename:= _
"T:\........\....xls" 'nom du classeur

Cordialement yoyo

 

[wazzebu]

Re : ouverture automatique de plusieurs classeurs

Bonjour yoyo69,

avec ce code tu choisit le classeur actif (l'autre seras donc en arrière plan):

Windows("NOM.xls").Activate

Voila

@+

Wazzebu