3 façons de supprimer rapidement tous les sauts de section dans votre document Word

Dans cet article, nous voulons partager avec vous 3 façons de supprimer rapidement tous les sauts de section dans votre document Word.

Les sauts de section sont utiles pour créer plusieurs sections dans un document Word. Ainsi, vous pouvez formater différentes sections dans des styles distincts. Et voici notre article précédent pour vous permettre d'insérer rapidement des sauts de section dans le document : 3 façons d'insérer rapidement des sauts de section dans votre document Word

Cependant, il est assez courant de réviser un document, comme changer les styles, rediviser les sections, etc. En particulier, s'il y a un gros ajustement à faire, vous devrez probablement supprimer tous les sauts de section. Voici 3 méthodes que vous pouvez utiliser pour supprimer les sauts de section par lots.

Méthode 1: rechercher tous les sauts de section dans le document

1. Tout d'abord, appuyez sur "Ctrl + H" pour ouvrir la boîte "Rechercher et remplacer" dans Word.
2. Ensuite, placez le curseur dans la zone de texte «Trouver quoi».
3. Cliquez sur le bouton «Plus» pour obtenir plus d'options.
4. Cliquez ensuite sur «Spécial» et choisissez «Saut de section» dans son menu. Ensuite, vous verrez «^ b» dans la zone de texte «Trouver quoi». Une autre façon est donc de saisir «^ b» directement après l'étape 2.
5. Enfin, laissez vide la case «Remplacer par» et cliquez sur «Tout remplacer». Cliquez sur «OK» dans la boîte de confirmation.

Méthode 2: exécuter une macro pour supprimer tous les sauts de section dans un document

Voici le moyen automatique de vous débarrasser de tous les sauts de section indésirables.

1. Pour commencer, ouvrez l'éditeur VBA dans Word en appuyant sur «Alt + F11».
2. Créez ensuite un nouveau module en cliquant sur «Normal».
3. Cliquez ensuite sur «Insérer» et sélectionnez «Module».
4. Maintenant, ouvrez le module avec un double clic.
5. Dans l'espace de codage sur le côté droit, collez les codes suivants:

Sub DeleteAllSectionsInOneDoc()
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^b"
      .Replacement.Text = ""
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
  End With
End Sub

6. Enfin, cliquez sur «Exécuter».

Vous ne trouverez tous les sauts de section nulle part en une seconde.

Méthode 3: supprimer tous les sauts de section dans plusieurs documents

De même, nous devons exécuter une macro si nous voulons le faire de manière rapide et sale.

1. Avant toute chose, placez tous les documents cibles dans un seul dossier.
2. Ensuite, installez une macro avec les étapes de la méthode 2.
3. Exécutez cette macro à la place:

Sub DeleteAllSectionBreaksInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "No folder is selected! Please select the target folder."
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
 
    With Selection
      .HomeKey Unit:=wdStory
      With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "^b"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
      End With
      Selection.Find.Execute Replace:=wdReplaceAll
    End With
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. Ensuite, dans la fenêtre «Parcourir» ouverte, sélectionnez le dossier dans lequel vous enregistrez les documents.
5. Dernier point mais non le moindre, cliquez sur «OK».

Préparez-vous à la perte de données

Normalement, avec de bonnes habitudes de travail, un peu de chance et de bonnes conditions, vous pouvez accomplir beaucoup de choses avec Word. Mais des plantages peuvent survenir à tout moment. Il est donc essentiel de sauvegarder régulièrement vos documents. Avec une sauvegarde, vous serez plus serein avant de commencer à travailler. correctif docx.

Introduction de l'auteur:

Vera Chen est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris récupération xls et pdf réparer les produits logiciels. Pour plus d'informations, visitez www.datanumen.com