Création de fichier Excel à partir d'une trame et d'une liste

Bonjour à tous,

j'ai besoin de vos compétence

Je dispose d'une liste excel avec 5 colonnes dans une feuille B et une trame de fichier dans la feuille A

J'aimerai mettre en automatique dans la feuille A les infos de la feuille en B en enregitrant le fichier avec le nom d'une case de la feuille B et faire un fichier excel par ligne.

Merci d'avance

Bonjour Max, bonjour le forum,

Peut-être comme ça :

Sub CréerLesFichiers2()
Dim CS As Workbook
Dim OS As Worksheet
Dim OL As Worksheet
Dim TV As Variant
Dim CA As String
Dim CC As Workbook
Dim OC As Worksheet
Dim I As Integer

Set CS = ThisWorkbook
Set OS = CS.Worksheets("Tableau")
CA = ThisWorkbook.Path & "\"
Set OL = CS.Worksheets("Liste")
TV = OL.Range("A1").CurrentRegion
For I = 1 To UBound(TV, 1)
    Sheets("Tableau").Copy
    Set CC = ActiveWorkbook
    Set OC = CC.Worksheets("tableau")
    OC.Range("C4:J4").Value = TV(I, 1)
    OC.Range("G8:H9").Value = TV(I, 3)
    OC.Range("G10:H11").Value = TV(I, 4)
    CC.SaveAs CA & TV(I, 2) & ".xlsx"
    CC.Close False
Next I
End Sub

Bonjour,

merci du retour parfait