Bonjour à tous,
Voilà, je cherche à copier une feuille d'un classeur Excel et le sauvegarder dans un dossier.
Je suis débutant sur VBA, j'ai pu établir le code ci dessous. Cependant, il me copie tout le classeur et non la feuille "Etape 2 - Factures EDF".
Je cherche donc un peu d'aide pour corriger mon code.
Je vous remercie par avance.
Bien à vous.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Public Sub CommandButton1_Click() Dim nom As String nom = "Facture EDF_" & Sheets("ETAPE 2 - Factures EDF").Range("C4") & "_" & ActiveWorkbook.Name ActiveWorkbook.SaveCopyAs ActiveWorkbook.Path & "\Factures_EDF\" & nom rep = MsgBox("Votre facture est sauvegardée sous le nom : " & nom, vbYes + vbInformation, "Copie sauvegarde classeur") End Sub
Partager