Copie d'un classeur existant vers 200 autres classeurs

Bonjour,

J'aimerai pouvoir copier une feuille d'un classeur de base vers 200 autres classeurs déjà existant sans devoir les ouvrir, faire un simple copier/coller et de devoir modifier toutes les formules à la main.

La feuille "Récap" du classeur de base "ACAR" est à copier dans tous les autres classeurs.

Y aurait-il une macro existante afin de pouvoir exécuter cette tâche.

Merci

Bonjour

Pour t'aider il nous faut au minimum 2 fichiers

Le principal : C'est de celui-ci que l'on copiera sur les autres

Un fichier récepteur de la feuille

Il faut indiquer exactement ce qu'il faut faire, et faire un exemple pour comprendre ce que tu veux obtenir

Expliques bien en quoi consiste la modification des formules

Tous les fichiers auront la même structure (nom des pages, nombre de colonnes etc ....) ?

bonsoir,

un début de code. si nécessaire affiner/préciser la sélection des fichiers en modifiant l'instruction

 f = Dir(chemin & "*.xls*")

Sub copierecap()
Set twb = ThisWorkbook
chemin = twb.Path & "\"
f = Dir(chemin & "*.xls*")
While f <> ""
Set wb = Workbooks.Open(chemin & f)
twb.Sheets("recap").Copy after:=wb.Worksheets(Worksheets.Count)
wb.Worksheets(Worksheets.Count).Name = "Recap"
wb.Save
wb.Close
f = Dir()
Wend

End Sub