Macro exportation vers un autre fichier

Bonjour à tous,

Je cherche désespérément sur internet quelque chose pouvant m'aider mais je ne trouve pas, j'espère que vous aurez la solution.

Je souhaite créer une macro qui m'exporte une feuille d'un fichier A vers un nouveau fichier B mais je ne sais pas comment faire.

Merci d'avance.

Salut,

Voici une macro qui déplace la feuille nommée ''Feuil2" vers un nouveau classeur renommé "Fichier B", pour autant que cette feuille ainsi nommée existe dans ton fichier.

Sub Deplace()
    Sheets("Feuil2").Move
    ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\Fichier B.xlsx"
End Sub

Cordialement.

Merci beaucoup

Je suis embêté avec mon codage, ci dessous

Sub Deplace()
chemin = Environ("USERPROFILE") & "\Desktop\Extrait de balance.xlsx"
Sheets("Balance").Copy
ActiveWorkbook.Close savechanges:=True, Filename:=chemin
MAJBDC.Show
End Sub

quand je change le .xlsx en .xlsm ca ne marche plus pourquoi ?

merci d'avance

Salut,

Essaie ainsi

Sub Deplace()
    Sheets("Balance").Copy
    ActiveWorkbook.SaveAs Filename:=Environ("USERPROFILE") & "\Desktop\Extrait de balance.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled
    ActiveWindow.Close
    MAJBDC.Show
End Sub

Ca marche nickel, merci beaucoup