Discussion :

[Goku.]

Bonsoir,

Ce code génère une erreur sur "var" car sans guillement le fichier se nommera tout simplement var et je souhaite que le nom du fichier prenne le contenu de la variable var.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Workbooks.Add
    ChDir "C:\Users\hack\Desktop"  'répertoire de sauvegarde
    ActiveWorkbook.SaveAs Filename:="C:\Users\hack\Desktop\"var".xlsx", _
    FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

[RyuAutodidacte]

Bonsoir,

si tu sais concaténer dans les formules Excel, et bien le principe est le même en vba.
si var est ta variable, il faut alors la déclarer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim var as String

Dans Excel pour les formules tu fais (résultat en C1) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=A1&" - "&B1

Dans vba le principe est le même :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("C1").Value = Range("A1").Value & " - " & Range("B1").Value

Dans ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim Chm as String, var as String
    Chm = "C:\Users\hack\Desktop\"
    var = "NomDuFichier"
    Workbooks.Add
    ActiveWorkbook.SaveAs Filename:= Chm & var & ".xlsx", _
    FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

[Goku.]

Tu m'as bien débloqué merci RyuAutodidacte.