Ir para o conteúdo principal

Pesquise e destaque os resultados da pesquisa no Excel

No Excel, você pode usar a função Localizar e Substituir para localizar um valor específico, mas você sabe como destacar os resultados da pesquisa após a pesquisa? Neste artigo, apresento duas maneiras diferentes de ajudá-lo a pesquisar e destacar os resultados da pesquisa no Excel.

Pesquise e destaque os resultados da pesquisa pelo código VBA

Pesquise e destaque os resultados da pesquisa pela Formatação Condicional

Pesquise e destaque os resultados da pesquisa com uma ferramenta útil


Pesquise e destaque os resultados da pesquisa pelo código VBA

No Excel, existe um código VBA que pode ajudá-lo a pesquisar um valor e então destacar os resultados da pesquisa.

1. Habilite a planilha que deseja pesquisar e realce os resultados, pressione Alt + F11 chaves para abrir Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o código abaixo no novo módulo.

VBA: destaque os resultados da pesquisa

Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)

If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub

pesquisa doc pesquisa resultado 1 de destaque

3. Pressione F5 , então uma caixa de pesquisa aparecerá para você digitar o valor especificado que você pesquisar.
pesquisa doc pesquisa resultado 2 de destaque

4. Clique OK, os resultados correspondentes foram destacados com uma cor de fundo. Além disso, uma caixa de diálogo aparece perguntando se você cancela o realce. Clique OK para cancelar o realce e fechar a caixa de diálogo, clique Cancelar para manter o destaque e fechar o diálogo.
pesquisa doc pesquisa resultado 3 de destaque

Note:

1. Se nenhum valor correspondente for encontrado, uma caixa de diálogo será exibida para lembrá-lo.
pesquisa doc pesquisa resultado 4 de destaque

2. Este VBA funciona para a planilha ativa inteira e não diferencia maiúsculas de minúsculas.

não se mova

Quer Aumentar o Salário e Muito Tempo para Acompanhar a Família?

Office Tab aumenta sua eficiência em 50% no Microsoft Office trabalhando agora

Inacreditável, trabalhar com dois ou mais documentos é mais fácil e rápido do que trabalhar com um.

Em comparação com navegadores conhecidos, a ferramenta com guias do Office Tab é mais poderosa e eficiente.

Reduza centenas de cliques do mouse e digitação no teclado todos os dias para você, diga adeus à mão do mouse agora.

Se você costuma trabalhar com vários documentos, o Office Tab economizará muito tempo.

30- dia de teste gratuito, não é necessário cartão de crédito.

Saiba MaisDownload grátis agora


Pesquise e destaque os resultados da pesquisa pela Formatação Condicional

No Excel, a função Formatação condicional também pode destacar automaticamente os resultados da pesquisa.

Supondo que os dados e a caixa de pesquisa sejam exibidos conforme a captura de tela abaixo, agora siga as etapas abaixo:
pesquisa doc pesquisa resultado 5 de destaque

1. Selecione o intervalo que deseja pesquisar e clique em Home page > Formatação condicional > Nova regra.
pesquisa doc pesquisa resultado 6 de destaque

2. No Nova regra de formatação diálogo, selecione Use uma fórmula para determinar quais células formatar no Selecione um tipo de regra seção e vá para a caixa de texto em Formate os valores onde esta fórmula for verdadeira, Tipo = E ($ E $ 2 <> "", $ E $ 2 = A4).

E2 é a célula em que você colocará o valor de pesquisa e A4 é a primeira célula no intervalo em que você pesquisa.
pesquisa doc pesquisa resultado 7 de destaque

3. Clique Formato botão, vá para o formatar células diálogo, sob Preencher guia, escolha uma cor conforme necessário. Clique OK > OK para fechar os diálogos.
pesquisa doc pesquisa resultado 8 de destaque

A partir de agora, ao inserir a palavra-chave na célula E2, os resultados da pesquisa serão destacados automaticamente no intervalo especificado.


Pesquise e destaque os resultados da pesquisa com uma ferramenta útil

Se você deseja pesquisar dois ou mais valores e destacar os resultados da pesquisa uma vez, o Marcar palavra-chave característica de Kutools for Excel poderia te dar um favor.

Kutools for Excel é um complemento poderoso que coleta mais de 300 ferramentas úteis para aumentar sua eficiência em trabalhos do Excel. Clique para obter um teste gratuito de 30 dias agora.

1. Selecione o intervalo de dados que deseja pesquisar e clique em Kutools > Texto > Marcar palavra-chave.
pesquisa doc pesquisa resultado 8 de destaque

2. Na caixa de diálogo pop-up, digite os valores que deseja pesquisar e separados por vírgula em Palavra-chave caixa de texto. Em seguida, escolha o Opções de marcação e a cor da fonte conforme necessário. Clique Ok.

Se você deseja pesquisar um valor com distinção entre maiúsculas e minúsculas, marque match Case caixa de seleção.
pesquisa doc pesquisa resultado 8 de destaque

Em seguida, os resultados correspondentes serão destacados com uma cor de fonte diferente.
pesquisa doc pesquisa resultado 8 de destaque

Com o Marcar palavra-chave recurso, você também pode encontrar parte da string no intervalo. Supondo que as células de pesquisa contenham bola ou pule, digite bola, pule para dentro do Palavra-chave caixa de texto, especifique as configurações e clique em Ok.
pesquisa doc pesquisa resultado 8 de destaquepesquisa doc pesquisa resultado 8 de destaque


Arquivo de exemplo

Clique para baixar o arquivo de amostra


Outras operações (artigos) relacionadas à formatação Conditioanl

Contar / somar células por cores com formatação condicional no Excel
Agora, este tutorial mostrará alguns métodos úteis e fáceis para contar ou somar rapidamente as células por cor com formatação condicional no Excel.

Crie um gráfico com formatação condicional no Excel
Por exemplo, se você tem uma tabela de pontuação de uma classe e deseja criar um gráfico para colorir as pontuações em diferentes intervalos, aqui este tutorial irá apresentar o método de resolução deste trabalho.

Gráfico de barras empilhadas de formatação condicional no Excel
Este tutorial apresenta como criar um gráfico de barras empilhadas de formatação condicional conforme a captura de tela abaixo mostrada passo a passo no Excel.

Formatação condicional de linhas ou células se duas colunas forem iguais no Excel
Neste artigo, apresento o método em linhas ou células de formatação condicional se duas colunas forem iguais no Excel.

Aplicar formatação condicional para cada linha no Excel
Às vezes, você pode querer aplicar a formatação condicional por linha. Exceto por definir repetidamente as mesmas regras por linha, existem alguns truques para resolver esse trabalho.


  • Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas e manutenção de dados; Dividir o conteúdo das células; Combine Linhas Duplicadas e Soma / Média... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Fórmulas favoritas e de inserção rápida, Intervalos, gráficos e imagens; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Agrupamento de tabela dinâmica por número da semana, dia da semana e mais ... Mostrar células desbloqueadas, bloqueadas por cores diferentes; Destacar células que possuem fórmula / nome...
guia kte 201905
  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
parte inferior da aba do escritório
Comments (10)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
how do I make a VBA to search a few times with different highlight color?

and

then how do i make the highlight area, not only in the exact cell but also the cells next to it, or the whole row?

Please advice.

Thank you.
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
how about highlight the keyword's row or column or the 3 cells next to the keyword?

and how do i search multiple times with different color of highlight?
This comment was minimized by the moderator on the site
How would I make the data entry box reopen after hitting ok? I use this macro with a barcode scanner and would like to be able to keep scanning without having to rerun macro each time. Example open macro scan it finds and highlights then reopens for next scan.
This comment was minimized by the moderator on the site
Hi, I have office 365 but when I went to Kutools > Text > I could not find Mark Keyword. Is there feature still there? Thanks
This comment was minimized by the moderator on the site
Hi, Kimber, what version of Kutools for Excel you use? Mark Keyword released after Kutools for Excel 24.0. If your version is lower than 24.0, please upgrade your version.
This comment was minimized by the moderator on the site
Does it work for Excel 2013 and what do I have to change in order to fit in with the 2003 version? I’ve tried your code but there is no button to save the module
This comment was minimized by the moderator on the site
Sorry, it’s Excel 2003
This comment was minimized by the moderator on the site
How can you modify this to also jump to the cell that is being highlighted.
This comment was minimized by the moderator on the site
Hi, Jeff, if you want to select all highlighted cells, just add
xRg.Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
If you want to jump to the first highlighted cell, add
xRg.Areas(xRg.Areas.Count)(1).Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
This comment was minimized by the moderator on the site
Hi thanks for your help but when we click ok for cancel highlighting. color of cell change. I want orignal color after cancel. What code i need to change in VBA.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations