Exécuter macro dans classeurs fermés

[BAT]

Bonjour à tous,

Après une recherche non concluante dans les posts du forum, je vous soumets mon problème que je cherche à résoudre.

Je souhaite par un clic de souris, que tous les classeurs (fermés) d'un répertoire de mon disc, mettent à jours les TCD qu'ils contiennent.

J'utilise actuellement une macro qui permet la mise à jour des TCD d'un classeur :

Sub MAJTCD()
   Sheets("AT").Select
    Application.ScreenUpdating = False  'ne pas voir ce qui se passe à l'écran, diminue besoin mémoire
 For Each s In ActiveWorkbook.Sheets
  For Each p In s.PivotTables
    p.RefreshTable
  Next p
 Next s
     Sheets("MENU").Select
    Range("C4:E4").Select
    Application.ScreenUpdating = True  'ne pas voir ce qui se passe à l'écran, diminue besoin mémoire
End Sub

Pensez vousqu'il est possible de l'exploiter pour arriver à mes fins ?

Merci à tous pour votre coup de pouce

 

[smotty]

Re : Exécuter macro dans classeurs fermés

Bonjour BAT,

As-tu une raison de vouloir les mettre à jour quand ils sont fermés?

ça ne suffit pas qu'ils se mettent à jour à l'ouverture?

En tout cas, bien que la raison m'échappe, il y a une solution, voici un code tapper directement sans tester à adapter à ta situation.

L'idée étant d'ouvrir les fichiers, les travailler et les refermer sans que ça se voit.

application.screenupdating=false

Rep=activework.path & "/"
S = Dir(rep)
If S <> "" Then
Do
If S Like "*.xls" Then
set w=createobject(rep & S)
For Each sh In w.Sheets
For Each p In sh.PivotTables
p.RefreshTable
Next p
Next sh
w.close savechanges:=true
End If
S = Dir
Loop While S <> ""
End If

application.screenupdating=true

En espérant que ça aidera

A+

smotty

 

[BAT]

Re : Exécuter macro dans classeurs fermés

Il ne se passe rien si ce n'est la fermeture du classeur où j'ai intégré ma macro !

 

[MJ13]

Re : Exécuter macro dans classeurs fermés

Bonjour BAT, Smotty

Voici un exemple avec l'aide d'excel (cela rejoint le code de smotty).

Décompresse les fichiers sur ton C:\ (attention tu doit avoir dans C:\TCD le fichier MAJTCD et en sous dossier c:\TCD\TCD les 2 fichiers TCD1 et TCD2).

 

[BAT]

Re : Exécuter macro dans classeurs fermés

Ca marche ! Merci beaucoup à tous les deux pour cette aide précieuse.🙂