2 métodos úteis para substituir a cor de destaque em seu documento do Word

Neste artigo, temos o prazer de mostrar a você 2 métodos úteis para substituir a cor de destaque em seu documento do Word.

Às vezes, você pode destacar conteúdos diferentes com cores diferentes. Mas, ao contrário da cor da fonte, você não pode utilizar “Localizar e substituir” para localizar textos em uma cor de destaque específica e substituí-la por outra.

Portanto, vamos precisar de algumas soluções alternativas. A seguir estão 2 maneiras disponíveis para casos diferentes.

Método 1: substituir todas as cores de destaque pela mesma

A cor de destaque associada à caixa de diálogo “Localizar e Substituir” é a atual selecionada no ícone Destaque.

1. Em primeiro lugar, na guia “Página inicial” e no grupo “Fonte”, clique no botão suspenso no comando “Cor de destaque do texto”. Escolha uma cor para a qual deseja alterar todas as cores de destaque. Por exemplo, escolhemos “Bright Green” aqui.
2. Em seguida, pressione “Ctrl + H” para acionar a caixa de diálogo “Localizar e substituir”.
3. Coloque o cursor dentro da caixa de texto "Localizar".
4. Clique em “Mais” para trazer mais opções e clique em “Formatar”.
5. E escolha “Destacar”.
6. Em seguida, coloque o cursor dentro da caixa “Substituir por” e repita os passos 4 e 5.
7. Por fim, clique em “Substituir tudo”.

Agora você substituiu todas as cores de destaque pelo verde brilhante.

Método 2: substituir uma cor de destaque específica por outra

Para realizar esta tarefa, uma macro é necessária.

1. primeiro e primeiroost, pressione “Alt+F11” para abrir o editor VBA.
2. Em seguida, clique no projeto “Normal” na coluna da esquerda.
3. Em seguida, clique na guia "Inserir" na barra de menu.
4. E escolha “Módulo” no menu suspenso.
5. Abra o novo módulo clicando duas vezes.
6. Agora cole os seguintes códigos:

Sub ReplaceOneHighlightColorToAnother()
  Dim strFindColor As String
  Dim strReplaceColor As String
  Dim objDoc As Document
  Dim objRange As Range
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  strFindColor = InputBox("Specify a color (enter the value):", "Specify Highlight Color")
  strReplaceColor = InputBox("Specify a new color (enter the value):", "New Highlight Color")
 
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .Highlight = True
 
      Do While .Execute
        If Selection.Range.HighlightColorIndex = strFindColor Then
          Set objRange = Selection.Range
          objRange.HighlightColorIndex = strReplaceColor
          Selection.Collapse wdCollapseEnd
        End If
      Loop
    End With
  End With
 
  Application.ScreenUpdating = True
End Sub

7. Em seguida, clique no botão "Executar" ou pressione "F5".
8. Em seguida, na caixa "Especificar cor de destaque", insira um valor que represente a cor a ser substituída. Para obter o valor correspondente de uma cor específica, você pode visitar este link: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Por exemplo, se quisermos substituir a cor amarela por verde brilhante, inserimos “7” na caixa “Especificar cor de destaque” e clicamos em “OK”.
10. Em seguida, na caixa “Nova cor de destaque”, insira um valor da nova cor e clique em “OK”.

Aqui está o possível resultado da substituição do amarelo pelo verde brilhante.

Evite desastres de perda de dados

O Word é um grande auxiliar em nosso trabalho diário. Portanto, não é difícil imaginar a catástrofe que pode trazer quando desaba. Para evitar a perda de dados críticos, você pode obter um Correção de palavras ferramenta com antecedência. Com esse utilitário em mãos, você não precisa se preocupar com a perda de dados.

Introdução do autor:

Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo xlsx corrompido e pdf reparar produtos de software. Para mais informações visite www.datanumen.com