Convertir chaque onglet en un fichier différent excel 2010

[Calou93]

Bonjour,

Je voudrais utiliser une macro (je débute) pour convertir automatiquement mes 55 onglets en un fichier excel 2010 individuel. En prime, si le nouveau fichier pouvait prendre le nom de l'onglet d'origine se serait grandiose.
J'ai fouiné sur le net et je n'ai trouvé que la façon de transformer chaque onglet en pdf, ce qui ne règle pas mon problème.

merci de votre aide

Calou93

 

[Papou-net]

Re : Convertir chaque onglet en un fichier différent excel 2010

Bonjour Calou93,

Voici une macro à insérer dans un nouveau module de code:

Sub CopieFeuilles()
For Each sh In Sheets
  sh.Copy
  ActiveWorkbook.SaveAs ActiveWorkbook.Path & "\" & sh.Name & ".xlsx"
  ActiveWorkbook.Close
Next
End Sub

Ce code copie chaque feuille du classeur dans un nouveau classeur et l'enregistre au nom de la feuille dans le même répertoire que le fichier source.

Cordialement.

 

[Calou93]

Re : Convertir chaque onglet en un fichier différent excel 2010

Bonjour,

Merci beaucoup pour votre aide !!!