Hi Mo,
Change the main path "C:\MyDocuments\", where your subfolders from column AC are located, on code line 13 and give the following code a try:
Sub RunMe()
Dim mCN, mGN, mSF As String
Dim mWB As String
mWB = ThisWorkbook.FullName
Sheets("Info_base").Select
For Each cell In Range("A3:A22")
mCN = cell.Value
mGN = Range("B" & cell.Row).Value
mSF = Range("AC" & cell.Row).Value
Sheets("Formulaire").Range("D22").Value = mCN
ActiveWorkbook.SaveAs Filename:="C:\MyDocuments\" & mSF & "\" & "2021-01_Analysis_" & mGN & "_#" & mCN & ".xlsm"
Next cell
Workbooks.Open (mWB)
Workbooks("2021-01_Analysis_" & mGN & "_#" & mCN & ".xlsm").Close
End Sub
1- It will include all the sheets from the "model" excel file, including '"Formulaire"
2- The subfolder names would be in the 29th column, that is column AC, with the contract numbers being in column A of the sheet "Info-base"
3- The groupnames are on column B, just right beside the contract numbers.
Thanks again