enregistrer feuille par feuille Fermé

Question

Bonjour, 

je viens vers la communauté car voilà quelques jours que je cherche un code macro me permettant d'enregistrer un classeur excel composer de 59 onglets, en feuille par feuille avec le nom d'onglet correspondant.... mais je ne trouve pas mon bonheur....

si quelqu'un aurait une idée ??

en vous remerciant d'avance,

cordialement,

moogu


Configuration: Mac OS X Lion (10.7.5) / Chrome 23.0.1271.101

PHILOU10120 · Answer

Bonjour

Voulez-vous avoir 59 classeurs différents ?

moogue · Answer

bonjour,


oui oui, ce serait ce que je recherche,

obtenir une feuille par classeur....

merci,

PHILOU10120 · Answer

Bonjour

Il faut cliquer droit sur l'onglet de la feuille
Déplacer ou Copier ...
Sélectionner la feuille
mettre la coche dans créer une copie (si vous voulez garder le classeur d'origine)
et sélectionner nouveau classeur dans la liste déroulante
et valider Ok
un nouveau classeur se crée il faut le sauvegarder avec un nom à votre convenance
Voir avec les Utilisateurs chevronnés en VBA pour automatiser si cela vaux le coùt

Morgothal · Answer

Bonjour,
Voici un code qui copie toutes les feuilles du classeur dans des classeurs à une feuille, nommé comme la feuille, et qui les enregistre dans le même répertoire que le classeur source :

Sub feuilles_en_classeur()
Dim feuille As Worksheet
Dim enregistrement, path, nomfeuille As String

path = ActiveWorkbook.path & "\"

For Each feuille In ActiveWorkbook.Sheets

nomfeuille = feuille.Name

    feuille.Select
    feuille.Copy
    ChDir path
    enregistrement = path & nomfeuille & ".xlsx"
    ActiveWorkbook.SaveAs Filename:=enregistrement, FileFormat:= _
        xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
    ActiveWindow.Close

Next
End Sub

moogue · Answer

Merci pour toutes ces réponses :)

je vais essayer la macro de suite pour voir le résultat,


moogu

Enregistrer feuille par feuille

5 réponses

Discussions similaires