Diviser un document Word en plusieurs fichiers par Titre 1 (guide pas à pas)

Lorsque vous travaillez sur de longs documents Word — comme des rapports, manuels, livres ou dossiers de projet — il peut être utile de les diviser en fichiers plus petits, par exemple un chapitre par fichier. Si votre document utilise déjà le style « Titre 1 » pour marquer les titres principaux de section, cette tâche devient bien plus simple. Voici un guide complet pour le faire efficacement.

• Préparez votre document Word
• Méthode 1 : Diviser un document Word par Titre 1 à l’aide de la fonction Plan
• Méthode 2 : Diviser un document Word par Titre 1 à l’aide d’un code VBA
• Méthode 3 : Diviser un document Word par Titre 1 avec Kutools pour Word
• Conclusion

Préparez votre document Word

Avant d’appliquer une méthode, veillez à ce que votre document soit correctement structuré : Word ne peut identifier les points de division que si le style Titre 1 est appliqué de manière appropriée.

Appliquez les styles :

Appliquez les styles de titre de façon cohérente : utilisez le style « Titre 1 » pour les titres de niveau 1, « Titre 2 » pour ceux de niveau 2, et ainsi de suite.

Sélectionnez votre titre → Accédez à l’onglet Accueil → Cliquez sur « Titre 1 » dans la galerie des styles.

Sauvegardez votre fichier :

Enregistrez toujours une copie de votre document original avant de le diviser, car certaines méthodes — comme la vue Plan — peuvent être difficiles à annuler.

Méthode 1 : Diviser un document Word par Titre 1 à l’aide de la fonction Plan

En réalité, la vue Plan intégrée à Word rend cette tâche incroyablement simple : elle détecte automatiquement les sections au format Titre 1, vous permettant d’organiser aisément la structure de votre document et d’exporter chaque chapitre en tant que fichier distinct — sans module complémentaire ni manipulation complexe.

1. Ouvrez le document Word, accédez à l’onglet Affichage, puis cliquez sur Plan, voir la capture d’écran :
   
2. Dans l’onglet Plan qui apparaît, définissez la liste déroulante Niveau à afficher sur Niveau 1. Cela réduit tout sauf vos titres de niveau 1.
   
3. Ensuite, appuyez sur Ctrl + A pour sélectionner tout le texte. Puis, cliquez sur Afficher le document dans le groupe Document maître.
   
4. Cliquez ensuite sur le bouton Créer. Word encadrera alors chaque section dans une fine boîte.
   
5. Accédez à Fichier > Enregistrer sous, puis choisissez un nouveau dossier. Word générera automatiquement des fichiers séparés au format .docx pour chaque Titre 1, en utilisant le texte du titre comme nom de fichier. Un document d’index distinct sera également créé, contenant des liens hypertexte vers tous les fichiers divisés — vous permettant d’ouvrir n’importe lequel d’un simple clic.
   

Méthode 2 : Diviser un document Word par Titre 1 à l’aide d’un code VBA

Si votre document est très long, la méthode Plan peut parfois provoquer des anomalies de mise en forme. L’utilisation d’un script VBA s’avère bien plus propre et rapide.

1. Appuyez sur Alt + F11 pour ouvrir la fenêtre Visual Basic pour Applications.
2. Cliquez sur Insertion>Module. Copiez et collez le code suivant dans le module vierge :
   

   Sub SplitDocByHeading1()
       Dim StrTmplt As String
       Dim StrPath As String
       Dim StrFlNm As String
       Dim Rng As Range
       Dim i As Long
       Dim Doc As Document
       Dim fDialog As FileDialog
       Const StrNoChr As String = """*./\:?|"
       Application.ScreenUpdating = False
       Set fDialog = Application.FileDialog(msoFileDialogFolderPicker)
       With fDialog
           .Title = "Select a folder to save the split documents"
           .AllowMultiSelect = False
           If .Show <> -1 Then
               MsgBox "Operation cancelled.", vbInformation, "Split by Heading 1"
               Application.ScreenUpdating = True
               Exit Sub
           End If
           StrPath = .SelectedItems(1)
       End With
       If Right(StrPath, 1) <> "\" Then
           StrPath = StrPath & "\"
       End If
       With ActiveDocument
           StrTmplt = .AttachedTemplate.FullName
           With .Range
               With .Find
                   .ClearFormatting
                   .Replacement.ClearFormatting
                   .Text = ""
                   .Replacement.Text = ""
                   .Style = wdStyleHeading1
                   .Format = True
                   .Forward = True
                   .Wrap = wdFindStop
                   .Execute
               End With
               Do While .Find.Found
                   Set Rng = .Duplicate
                   StrFlNm = Split(Rng.Paragraphs(1).Range.Text, vbCr)(0)
                   For i = 1 To Len(StrNoChr)
                       StrFlNm = Replace(StrFlNm, Mid(StrNoChr, i, 1), "_")
                   Next i
                   StrFlNm = StrFlNm & ".docx"
                   Set Rng = Rng.GoTo(What:=wdGoToBookmark, Name:="\HeadingLevel")
                   Set Doc = Documents.Add(Template:=StrTmplt, Visible:=False)
                   With Doc
                       .Range.FormattedText = Rng.FormattedText
                       .SaveAs2 FileName:=StrPath & StrFlNm, _
                                FileFormat:=wdFormatXMLDocument, _
                                AddToRecentFiles:=False
                       .Close SaveChanges:=False
                   End With
                   .Collapse wdCollapseEnd
                   .Find.Execute
               Loop
           End With
       End With
       Set Doc = Nothing
       Set Rng = Nothing
       Application.ScreenUpdating = True
       MsgBox "Split completed successfully.", vbInformation, "Split by Heading 1"
   End Sub
   

3. Appuyez sur F5 ou cliquez sur Exécuter pour exécuter le code. Une fenêtre s’affichera, vous invitant à choisir un dossier dans lequel enregistrer les fichiers divisés. Voir la capture d’écran :
   
4. Cliquez sur OK et Word créera immédiatement un fichier .docx pour chaque section de niveau Titre 1. Ouvrez le dossier pour découvrir le résultat !
   

Méthode 3 : Diviser un document Word par Titre 1 avec Kutools pour Word

Bien que les outils intégrés de Word et le VBA permettent de diviser des documents, ils nécessitent plusieurs étapes, des compétences techniques et peuvent même entraîner une perte de mise en forme. Kutools pour Word propose une solution bien plus propre et efficace. Grâce à sa fonction Diviser le document, vous pouvez diviser un fichier par Titre 1, Saut de page, Saut de section, page, etc., en un seul clic — sans codage, sans travail manuel et sans perte de mise en forme. Kutools conserve les styles, la mise en page, les images, les en-têtes et pieds de page, ce qui en fait l’outil idéal pour quiconque travaille avec des documents volumineux.

Après avoir téléchargé et installé Kutools pour Word, procédez comme suit :

1. Accédez à KUTOOLS PLUS > Diviser.
   
2. Dans la boîte de dialogue Diviser le document, spécifiez les options suivantes :

   2,1 Choisissez Titre 1 dans le menu déroulant Diviser par. (Vous pouvez également sélectionner d’autres règles de division, telles que Saut de page, Saut de section, Page, Toutes les n pages, et bien plus encore.)

   2,2 Indiquez un dossier dans lequel enregistrer les nouveaux fichiers issus de la division.

   2,3 Cliquez sur le bouton OK.

   Astuce : Vous pouvez également ajouter un préfixe au titre de chaque fichier divisé en saisissant du texte dans la zone Préfixe du document.

   
   

Résultat :
Kutools génère instantanément plusieurs fichiers Word selon votre structure de Titre 1, tout en conservant intégralement les en-têtes et pieds de page.

Conclusion

Articles associés :