Executer une macro sur 1 répertoire sur plusieurs fichiers POSSIBLE?????

[megansport]

Bonjour
J'éspére que le titre est explicite, voici ma macro ci dessous

"Sub a()
Dim i As Byte, x As Byte

x = Sheets.Count

For i = 1 To x
Sheets(i).Select
ActiveSheet.Pictures.Delete
Next
End Sub"

Je voudrais la faire tourner sur plusieurs dossiers dans un répertoire sans ouvrir les dossiers un par un
Est ce possible, qu'est ce que je dois rajouter à ma macro ou dois je faire une nouvelle?

Merci de votre aide

 

[megansport]

Re : Executer une macro sur 1 répertoire sur plusieurs fichiers POSSIBLE?????

Je cherche mais je trouve pas....... une idée?????😕

 

[MJ13]

Re : Executer une macro sur 1 répertoire sur plusieurs fichiers POSSIBLE?????

Bonjour Megansport


Cela ne me paraît pas possible mais tu peux faire une macro pour lister l'ensemble de tes fichiers, les ouvrir, traiter avec ta macro et refermer le fichier en l'enregistrant. C'est pas très compliqué à faire 🙂.