En este artículo a continuación, le ofreceremos 2 formas de eliminar por lotes los corchetes y los espacios interiores en su documento de Word.
De vez en cuando, a la gente le gusta usar corchetes para marcar palabras con todo tipo de propósitos. Sin embargo, después de un tiempo, puede decidir eliminar todos los corchetes, pero solo para descubrir que hay muchos, esparcidos por su documento. Honestamente, puede llevar una eternidad eliminarlos uno por uno. Además, por alguna necesidad especial, es posible que también deba eliminar todos los espacios entre un par de corchetes.
Es por eso que deberá leer este artículo para equiparse con soluciones más prácticas.
Método 1: utilizar comodines en el comando "Búsqueda avanzada"
- En primer lugar, haga clic en la pestaña "Inicio" y haga clic en el botón desplegable en el comando "Buscar".
- A continuación, elija "Búsqueda avanzada" en el menú desplegable para abrir el cuadro de diálogo "Buscar y reemplazar".
- Por ejemplo, si desea buscar todos los corchetes, ingrese "\ [* \]”(Sin comillas) en el cuadro de texto“ Buscar qué ”.
- A continuación, haga clic en el botón "Más" para mostrar más opciones.
- Marque la casilla "Usar comodines".
- Luego haga clic en la pestaña "Buscar en" y seleccione "Documento principal". Verá todos los corchetes y los textos adjuntos están seleccionados, como a continuación:
- Ahora borre el cuadro de texto "Buscar qué" y escriba "[[\]]”(Sin comillas).
- Haga clic en "Buscar en" y esta vez elija "Selección actual". Encontrará todos los corchetes y todos los espacios en el interior están seleccionados de la siguiente manera:
- Presione "Eliminar" para deshacerse de los corchetes y todos los espacios dentro.
- Sin embargo, si desea mantener los espacios, simplemente reemplace las cadenas en el paso 7 con "[[\]].
Hay varios tipos de delimitadores de uso común en la siguiente tabla, junto con las cadenas para encontrarlos o los espacios interiores.
| Soportes | Cadenas para buscar corchetes y todos los textos adjuntos | Cadenas para buscar corchetes y todos los espacios en el interior | Cadenas para buscar solo corchetes |
| Corchetes
[] |
\ [* \] | [[\]] | [[\]] |
| Paréntesis
() |
\ (* \) | [(\)] | [(\)] |
| Tirantes (corchetes)
{} |
\ {* \} | [{\}] | [{\}] |
| Paréntesis angulares
<> |
\ <* \> | [<\>] | [<\>] |
Método 2: ejecutar códigos VBA
- En primer lugar, presione "Alt + F11" para abrir el editor de VBA.
- A continuación, haga clic en "Normal" y luego en la pestaña "Insertar".
- Elija "Módulo".
- Luego haga doble clic en para abrirlo.
- Y pega los siguientes códigos allí:
Sub DeleteDelimiters(objFind As Find, strLeftDelimiter As String, strRightDelimiter As String, bDeleteSpace As Boolean)
Dim strFind1 As String
Dim strFind2 As String
strFind1 = "\" & strLeftDelimiter & "*\" & strRightDelimiter
If (bDeleteSpace) Then
strFind2 = "[" & strLeftDelimiter & "\" & strRightDelimiter & " ]"
Else
strFind2 = "[" & strLeftDelimiter & "\" & strRightDelimiter & "]"
End If
Selection.HomeKey Unit:=wdStory
objFind.ClearFormatting
objFind.Replacement.Text = ""
While objFind.Execute(FindText:=strFind1, MatchWildcards:=True)
objFind.Execute FindText:=strFind2, MatchWildcards:=True, _
ReplaceWith:="", Replace:=wdReplaceAll, Wrap:=wdFindStop
Wend
End Sub
Sub DeleteBracketsAndSpace()
Application.ScreenUpdating = False
' Delet all square brackets and the space in it.
Call DeleteDelimiters(Selection.Find, "[", "]", True)
' Delet all parenthesis and the space in it.
Call DeleteDelimiters(Selection.Find, "(", ")", True)
' Delet all braces and the space in it.
Call DeleteDelimiters(Selection.Find, "{", "}", True)
' Delet all angle brackets and the space in it.
Call DeleteDelimiters(Selection.Find, "<", ">", Ture)
Application.ScreenUpdating = True
End Sub
- Ahora, en la macro “DeleteBracketsAndSpace”, mantenga solo las líneas que necesita para eliminar los corchetes que tiene en su documento y elimine todas las líneas de código innecesarias.
Si solo desea deshacerse de los corchetes, debe modificar un poco los códigos. Digamos que hay corchetes en su documento. Luego vaya a la línea "Call DeleteDelimiters (Selection.Find," [","] ", True)" y cambie el "Cierto" a "Falso.
- Finalmente, haga clic en "Ejecutar".
Resolver problemas de palabras
Para ser honesto, Word es realmente capaz de realizar muchas tareas. Sin embargo, después de todo, no es perfecto. Cuando ocurre un problema, el resultado puede ser devastador. Por lo tanto, nunca podemos pasar por alto cualquier pequeño problema en Word, ya que puede llevarlo a una Palabra muerta con docx corrupto archivos. La mejor solución es obtener una herramienta de reparación avanzada para recuperar sus documentos de Word.
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 reparación xlsx y pdf reparar productos de software. Para más información visite www.datanumen.com






