Création automatique dossier - sous dossier + intégration fichier

Bonjour,

Dans le cadre d'un suivi de projet, j'ai créer un tableau Excel dans lequel j'ai la liste de tous les outillages nécessaires.
De là, j'ai créé une macro pour, dans un dossier donné, créer des dossiers pour chaque ligne de mon tableau et des sous dossiers automatiquement via un bouton.
Jusque là pas de soucis.
Maintenant, j'aimerai, lors de la création des ses dossiers et sous dossier, mettre des fichiers automatiquement.
Par exemple: dans le sous dossier "consultation", insérer automatiquement un fichier excel nommé "fiche de consultation"

J'avoue ne pas savoir faire

Je vous joins un fichier exemple

J'espère avoir été clair dans mes explications

Merci d'avance pour votre aide.

Hello,

A tester

chemin_sous_dossier = chemin_dossier & "02 - Consultation\"
MkDir (chemin_sous_dossier)
Workbooks.Add.SaveAs Filename:=chemin_sous_dossier & "NewClasseur.xlsx"

Bonjour le fil,

Si j'ai bien compris la demande, ce n'est pas ça @Rag02700

Pour copier un fichier, voici une possibilité

' Créer une instance de File System Object
Set Fso = CreateObject("Scripting.FileSystemObject")
sPathIni = "D:\Users\GetGet17000\Documents\"
sPathDest = "C:\temp\"
sFic = "MonFichierModèle.xlsx"
' Copie le fichier d'aide
Fso.CopyFile sPathIni & sFic, sPathDest & sFic, True
' Effacer la variable objet
Set Fso = Nothing

Ou plus simplement

sPathIni = "D:\Users\GetGet17000\Documents\"
sPathDest = "C:\temp\"
sFic = "MonFichierModèle.xlsx"
FileCopy sPathIni & sFic, sPathDest & sFic

A+

Bonjour Bruno,

Merci pour ton aide.

J'ai intégré tes lignes de codes dans ma marco et il y a un bug.

Voir image jointe.

Perso, je ne sais pas interpréter cela.

Merci

Bonjour,

Je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER]
qui vous aidera dans vos demandes et réponses sur ce forum et notamment :

• Ne postez pas la même question sur un autre forum pour éviter de faire perdre bêtement du temps aux membres sur un problème qui peut être déjà résolu sur l'autre forum. L'inverse est également valable, si vous avez déjà posé votre question sur un autre forum, ne créez pas un doublon sur ce forum (à moins d'avoir clôturé le sujet sur l'autre forum).

Merci de votre compréhension