Comment diviser un classeur en fichiers Excel séparés dans Excel ?

En général, l'utilisation des commandes Copier et Coller peut enregistrer manuellement un classeur sous forme de fichier Excel séparé. Tout d'abord, sélectionnez toute la feuille de calcul que vous souhaitez enregistrer comme un fichier séparé, créez un nouveau classeur, puis collez-la dans le nouveau classeur, et enfin enregistrez-le.

C'est une méthode simple à utiliser si vous devez diviser seulement quelques feuilles de calcul en fichiers séparés. Cependant, il est très chronophage et fastidieux de diviser de nombreuses feuilles de calcul avec des copies et collages manuels.

Cette méthode présente la fonction Déplacer ou Copier pour déplacer ou copier les feuilles sélectionnées vers un nouveau classeur et l'enregistrer comme un classeur séparé. Veuillez procéder comme suit :

1. Sélectionnez les feuilles dans la barre d'onglets des feuilles, faites un clic droit, puis sélectionnez Déplacer ou Copier dans le menu contextuel. Voir capture d'écran :

Remarque: En maintenant la touche Ctrl enfoncée, vous pouvez sélectionner plusieurs feuilles non adjacentes en cliquant dessus une par une dans la barre d'onglets des feuilles ; en maintenant la touche Maj enfoncée, vous pouvez sélectionner plusieurs feuilles adjacentes en cliquant sur la première et la dernière dans la barre d'onglets des feuilles.

2. Dans la boîte de dialogue Déplacer ou Copier, sélectionnez (nouveau classeur) dans la liste déroulante Vers le classeur cochez l'option Créer une copie et cliquez sur le bouton OK Voir capture d'écran :

3. Maintenant, toutes les feuilles sélectionnées sont copiées dans un nouveau classeur. Cliquez sur Fichier > Enregistrer pour sauvegarder le nouveau classeur.

Si vous avez installé Kutools pour Excel, son outil Diviser le Classeur peut diviser plusieurs feuilles de calcul en fichiers Excel séparés facilement et rapidement en quelques clics.

1. Après avoir installé Kutools for Excel, cliquez sur Kutools Plus > Diviser le Classeur , voir capture d'écran :

2. Dans la boîte de dialogue Diviser le Classeur effectuez les opérations suivantes :
(1) Tous les noms des feuilles de calcul sont cochés par défaut. Si vous ne voulez pas diviser certaines des feuilles, vous pouvez les décocher ;
(2) Cochez l'option Enregistrer sous un type ;
(3) Dans la liste déroulante Enregistrer sous le type choisissez un type de fichier que vous souhaitez diviser et enregistrer.
(4) Puis cliquez sur le bouton Diviser bouton.

Remarque : Si vous souhaitez éviter de diviser les feuilles de calcul masquées ou vides, vous pouvez cocher la case Ignorer les feuilles de calcul masquées ou Ignorer les feuilles de calcul vides.

3. Dans la boîte de dialogue Parcourir le dossier, veuillez spécifier un dossier de destination pour enregistrer les fichiers divisés, et cliquez sur le bouton OK bouton.

Maintenant, les feuilles de calcul cochées sont enregistrées comme de nouveaux classeurs séparés. Chaque nouveau classeur est nommé avec le nom de la feuille de calcul d'origine. Voir capture d'écran :

L'outil Diviser le Classeur de Kutools pour Excel facilite la division du classeur actif en fichiers Excel individuels (un fichier contient une feuille de calcul), des fichiers CSV, des fichiers TXT, ou des fichiers PDF selon vos besoins. Vous pouvez configurer pour ignorer toutes les feuilles de calcul vides et masquées. Essayez gratuitement !

Le code VBA suivant peut vous aider à diviser rapidement plusieurs feuilles de calcul du classeur actuel en fichiers Excel séparés, veuillez procéder comme suit :

1. Créez un nouveau dossier pour le classeur que vous souhaitez diviser, car les fichiers Excel divisés seront placés dans le même dossier que ce classeur principal.

2. Maintenez les touches ALT + F11 enfoncées dans Excel, et cela ouvre la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insérer > Module, et collez le code suivant dans la fenêtre Module.

VBA : Diviser un classeur en plusieurs classeurs et enregistrer dans le même dossier

Sub Splitbook()
'Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
    xWs.Copy
    Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx"
    Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Appuyez sur la touche F5 pour exécuter ce code. Et le classeur est divisé en fichiers Excel séparés dans le même dossier que le classeur d'origine. Voir capture d'écran :

Remarque : Si l'une des feuilles porte le même nom que le classeur, ce VBA ne fonctionnera pas.

Combiner plusieurs classeurs en un seul classeur

Enregistrer une sélection comme fichier individuel