Déplacer ou copier onglet, puis enregistrer

[JANO]

Re bonjour le forum,


j'ai deux fichier ouvert qui n'ont jamais le meme nom , c'est deux fichier ont un onglet chacun.
je souhaiterai que la macro copie les deux onglet dans un nouveau fichier puis l' enregistre sur le bureau.

j'ai essayer avec l'enregistreur mais sans réusite
pouvez vous m'aider
merci

 

[JANO]

Re : Déplacer ou copier onglet, puis enregistrer

avec 1 seul classeur actif la macro ci dessous fonctionne
mais comment l'adapter pour qu'elle copie la feuille des deux classeurs ouvert et ensuite l'enregistre comme ci dessous.
merci de ton aide le forum

Sub ExporterFeuilleActive()
ActiveSheet.Copy
chemin = ThisWorkbook.Path
ActiveWorkbook.SaveAs Filename:=chemin & "\test" & ".xls"
'ActiveWorkbook.Close
End Sub