3 formas rápidas de cambiar por lotes el color de los textos entre paréntesis en su documento de Word

Comparte ahora:

En la publicación de hoy, nos centraremos en mostrar 3 maneras de cambiar el color de varios textos entre corchetes en tu documento de Word.

No es raro usar varios tipos de corchetes en su documento. Para los textos entre corchetes, tienen la misma importancia que los que no. Incluso a veces, tienes que destacarlos. Dada esta demanda, hemos resuelto 3 enfoques rápidos disponibles para que pueda cambiar por lotes el color de los textos entre paréntesis.Cambiar por lotes el color de los textos entre corchetes en su documento de Word

Método 1: utilice "Búsqueda avanzada" para buscar todos los textos entre corchetes

  1. Para empezar, haga clic en la pestaña "Inicio" en la cinta.
  2. A continuación, en el grupo "Edición", haga clic en el botón desplegable junto al comando "Buscar".
  3. En el menú desplegable, elija "Búsqueda avanzada" para abrir el cuadro de diálogo "Buscar y reemplazar".Haga clic en "Inicio" -> Haga clic en el botón desplegable junto a "Buscar" -> Seleccione "Búsqueda avanzada"
  4. Luego, coloque el cursor dentro del cuadro de texto "Buscar qué" e ingrese una de las cadenas en la siguiente tabla.
Soportes Cadenas para buscar corchetes y todos los textos adjuntos
Corchetes

[]

\ [* \]
Paréntesis

()

\ (* \)
Tirantes (corchetes)

{}

\ {* \}
Paréntesis angulares

<>

\ <* \>

 

  1. Haga clic en la pestaña "Más".
  2. Luego, marque la casilla "Usar comodines".
  3. Haga clic en "Buscar en" y seleccione "Documento principal".Ingrese la cadena en el cuadro de texto "Buscar qué" -> Haga clic en "Más" -> Marque la casilla "Usar comodines" -> Haga clic en "Buscar en" -> Elija "Documento principal"
  4. Ahora verá que todos los textos dentro del tipo específico de corchetes están seleccionados.
  5. Puede seguir actuando en el cuadro "Buscar y reemplazar" haciendo clic en la pestaña "Formato" y seleccione "Fuente".
  6. En el cuadro "Buscar fuente", elija un color de fuente y haga clic en "Aceptar". Luego, se cambiará el color de la fuente entre paréntesis.
  7. O puede presionar "Ctrl + D" para abrir el cuadro "Fuente" y establecer un color de fuente allí.

Método 2: utilice la función "Buscar y reemplazar" para cambiar el color de la fuente

  1. En primer lugar, presione "Ctrl + H" para activar el cuadro "Buscar y reemplazar".
  2. En el cuadro de texto "Buscar qué", ingrese una cadena disponible en la tabla en el método 1.
  3. Y en el cuadro de texto "Reemplazar con", ingrese "^ &".
  4. Luego haga clic en "Más" y marque la casilla "Usar comodines".
  5. A continuación, haga clic en el botón "Formato" y seleccione "Fuente".
  6. Establezca un color de fuente allí y haga clic en "Aceptar".
  7. Finalmente, haga clic en "Reemplazar todo" en el cuadro "Buscar y reemplazar".Ingrese cadenas en los cuadros de texto "Buscar qué" y "Reemplazar con" -> Marque el cuadro "Usar comodines" -> Haga clic en "Formato" -> "Fuente" -> "Reemplazar todo"

Método 3: ejecutar códigos VBA para cambiar el color de los textos

La ejecución de la siguiente macro cambiará todos los textos incluidos en todos los tipos de corchetes a un color designado.

  1. Presione "Alt + F11" para invocar el editor de VBA.
  2. Luego haga clic en el proyecto "Normal".
  3. A continuación, haga clic en "Insertar" y elija "Módulo".Haga clic en "Normal" -> Haga clic en "Insertar" -> Haga clic en "Módulo"
  4. Haga doble clic para abrir el módulo recién creado y pegue los códigos allí:
Sub ChangeTheFontColorInBrackets()
  Dim objRange As Range
  Dim strFontColor As String
  Set objRange = ActiveDocument.Content 
  strFontColor = InputBox("Enter the font color you want to change", "Font Color", "For example:2")
  ' Find the words in brackets and change the font color.

  With objRange.Find
    .Text = "\[*\]"
    .MatchWildcards = True
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\(*\)"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\{*\}"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\<*\>"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll   
  End With
End Sub
  1. Presione "F5" para ejecutar códigos.
  2. Aparecerá un cuadro de entrada. Puede buscar el valor de un color específico en esta página web:

https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex

Simplemente ingrese un valor y haga clic en "Aceptar" para continuar.Ingrese un valor de color de fuente -> Haga clic en "Aceptar"

Aquí está el posible resultado:Efecto de ejecutar códigos VBA

Abordar la corrupción de documentos de manera adecuada

No debes confiar en la suerte para mantener los datos seguros. En cambio, necesitas prepararte completamente antes de que ocurra cualquier desastre de datos. Una de las medidas más importantes es obtener una herramienta especializada para solucionarlo. palabra dañada por adelantado.

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 de Excel y pdf reparar productos de software. Para más información visite www.datanumen.com

Comparte ahora:

Los comentarios están cerrados.