3 formas de eliminar rápidamente todos los saltos de sección en su documento de Word

En este artículo, queremos compartir contigo 3 formas de eliminar rápidamente todos los saltos de sección en tu documento de Word.

Los saltos de sección son útiles para crear varias secciones en un documento de Word. De modo que puede formatear diferentes secciones en estilos distintivos. Y aquí está nuestro artículo anterior para que inserte rápidamente saltos de sección en el documento: 3 formas de insertar rápidamente cortes de sección en su documento de Word

Sin embargo, es bastante común revisar un documento, como cambiar estilos, volver a dividir secciones, etc. En particular, si hay un gran ajuste que hacer, probablemente necesitará eliminar todos los saltos de sección. A continuación se muestran 3 métodos que puede utilizar para eliminar los saltos de sección por lotes.

Método 1: buscar todos los saltos de sección en el documento

1. En primer lugar, presione "Ctrl + H" para abrir el cuadro "Buscar y reemplazar" en Word.
2. A continuación, coloque el cursor dentro del cuadro de texto "Buscar qué".
3. Haga clic en el botón "Más" para obtener más opciones.
4. Luego haga clic en "Especial" y elija "Salto de sección" en su menú. Luego verá "^ b" en el cuadro de texto "Buscar qué". Por lo tanto, una forma alternativa es ingresar “^ b” directamente después del paso 2.
5. Por último, deje el cuadro "Reemplazar con" en blanco y haga clic en "Reemplazar todo". Haga clic en "Aceptar" en el cuadro de confirmación.

Método 2: ejecutar una macro para eliminar todos los saltos de sección en un documento

Aquí está la forma automática de deshacerse de todos los saltos de sección no deseados.

1. Para empezar, abra el editor de VBA en Word presionando "Alt + F11".
2. Luego cree un nuevo módulo haciendo clic en "Normal".
3. A continuación, haga clic en "Insertar" y seleccione "Módulo".
4. Ahora abra el módulo con doble clic.
5. En el espacio de codificación del lado derecho, pegue los siguientes códigos:

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. Finalmente, haga clic en "Ejecutar".

No encontrará todos los saltos de sección en ningún lugar en un segundo.

Método 3: eliminar todos los saltos de sección en varios documentos

Del mismo modo, debemos ejecutar una macro si queremos hacerlo de una manera rápida y sucia.

1. Antes que nada, coloque todos los documentos de destino en una sola carpeta.
2. Luego instale una macro con los pasos del método 2.
3. En su lugar, ejecute esta macro:

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. A continuación, en la ventana "Examinar" abierta, seleccione la carpeta en la que guarda los documentos.
5. Por último, pero no menos importante, haga clic en "Aceptar".

Prepárese para la pérdida de datos

Normalmente, con buenos hábitos de uso, buena suerte y todas las bendiciones, puedes lograr mucho en Word. Pero los fallos pueden ocurrir en cualquier momento. Por lo tanto, es de vital importancia hacer copias de seguridad de los documentos con regularidad. Con una copia de seguridad a mano, tendrás más confianza antes de comenzar a trabajar. arreglar docx.

Introducción del autor:

Vera Chen es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo recuperación xls y pdf reparar productos de software. Para más información visite www.datanumen.com