Note: The other languages of the website are Google-translated. Back to English

Como filtrar células por caracteres em negrito no Excel?

Você pode aplicar o estilo de fonte em negrito para formatar os dados ou conteúdos em células no Excel, mas você sabe como filtrar células pelas células que contêm estilo de fonte em negrito no Excel? Este artigo coleta várias macros VBA complicadas para filtrar células por caracteres em negrito no Excel.

Filtre as células em negrito com a coluna auxiliar
Filtre células em negrito com o código VBA
Filtre células em negrito facilmente com uma ferramenta incrível
Mais tutoriais para filtragem de dados ...


Filtre as células em negrito com a coluna de ajuda

Supondo que você precise filtrar todas as células em negrito na coluna B, conforme a captura de tela mostrada abaixo, faça o seguinte:

A função definida pelo usuário a seguir ajuda a identificar se uma célula em uma coluna está em negrito ou não e, em seguida, retorna os resultados como TRUE ou False em uma coluna auxiliar. Você pode filtrar todos os resultados TRUE para exibir apenas as células em negrito na coluna B.

1. aperte o outro + F11 chaves para abrir o Microsoft Visual Basic para aplicativos janela.

2. No Microsoft Visual Basic para aplicativos janela, clique em inserção > Módulo, em seguida, copie o seguinte código VBA para a janela Módulo. Veja a imagem:

Código VBA: filtre células por caracteres em negrito

Function IsBold(rCell As Range)
IsBold = rCell.Font.Bold
End Function

3. aperte o outro + Q para fechar a janela de código.

4. Selecione uma célula em branco adjacente à tabela (a célula selecionada deve localizar-se na mesma linha da primeira linha da tabela de filtro), copie a fórmula abaixo nela e pressione o botão entrar chave.

= IsBold (B2)

5. Continue selecionando a primeira célula de resultado e arraste a alça de preenchimento para obter todos os resultados. Veja a imagem:

6. Selecione o cabeçalho da coluna auxiliar, clique Dados > Filtro. Clique no botão de seta ao lado da célula do cabeçalho, verifique o VERDADEIRO caixa apenas e clique em OK.

Agora todas as células em negrito na coluna B são filtradas conforme a imagem abaixo mostrada.


Filtre rapidamente células em negrito em uma coluna com vários cliques no Excel:

A Filtrar células em negrito utilidade de Kutools for Excel pode ajudá-lo a filtrar rapidamente todas as células em negrito em uma determinada coluna com vários cliques, como mostrado na demonstração abaixo.
Baixe o recurso completo 30Trilha gratuita de um dia de Kutools para Excel agora!


Filtre células em negrito com o código VBA

O código VBA a seguir permite filtrar todas as células em negrito em uma coluna diretamente. Faça o seguinte.

1. Selecione o intervalo da coluna, você filtrará todas as células em negrito, exceto a célula do cabeçalho. Nesse caso, seleciono B2: B16.

2. aperte o outro + F11 chaves para abrir o Microsoft Visual Basic para aplicativos janela.

3. No Microsoft Visual Basic para aplicativos janela, clique em inserção > Módulo, em seguida, copie e cole o seguinte código VBA na janela Módulo.

Código VBA: filtre células em negrito em uma coluna

Sub FilterBold()
'Updated by Extendoffice 20191018
Dim cell As Range
For Each cell In Selection
If cell.Font.Bold = False Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub

4. aperte o F5 chave para executar esta macro. Em seguida, todas as células em negrito são filtradas imediatamente no intervalo da coluna selecionada.


Filtre células em negrito facilmente com uma ferramenta incrível

Nesta seção, recomendamos uma ferramenta útil - o Filtrar células em negrito utilidade de Kutools for Excel. Com este utilitário, todas as células em negrito na coluna selecionada são filtradas imediatamente com vários cliques.

Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.

1. Selecione o intervalo de colunas em que você filtrará as células em negrito, clique Kutools Plus> Filtro Especial > Filtro Negrito para fazer isso. Veja a demonstração abaixo:

  Se você quiser ter uma avaliação gratuita (30-dia) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.


Artigos relacionados

Filtrar várias colunas simultaneamente no Excel
Depois de filtrar uma coluna com o recurso Filtro, apenas os critérios E podem ser aplicados a mais de uma coluna. Nesse caso, como você poderia aplicar os critérios AND e OR para filtrar várias colunas simultaneamente na planilha do Excel? Os métodos neste artigo podem lhe fazer um favor.

Filtre ou selecione células por cor de célula no Excel
Normalmente, você pode preencher células com cores diferentes para qualquer finalidade no Excel. Se você tiver uma planilha com o uso de cores diferentes para indicar diferentes tipos de conteúdo e quiser filtrar ou selecionar essas células pela cor da célula, poderá fazê-lo com os métodos deste artigo.

Colar pulando células e linhas ocultas / filtradas no Excel
Por exemplo, você filtrou uma tabela no Excel, mas agora precisa copiar um intervalo e colar nesta tabela filtrada. Você sabe como colar pulando as células e linhas ocultas / filtradas? Várias maneiras fáceis neste artigo podem ajudá-lo.

Filtre as linhas com base em uma seleção de lista em outra folha
No Excel, geralmente filtramos as linhas com base em um critério, mas se houver duas listas, uma na Planilha1 e outra na Planilha2, você poderia ter algum truque para filtrar rapidamente as linhas na Planilha1 com base na lista na Planilha2? Aqui, este artigo apresenta as maneiras de resolver esse trabalho.

Filtre todos os dados relacionados de células mescladas no Excel
Supondo que haja uma coluna de células mescladas em seu intervalo de dados, e agora, você precisa filtrar esta coluna com células mescladas para mostrar todas as linhas que estão relacionadas com cada célula mesclada conforme as capturas de tela a seguir mostradas. No Excel, o recurso Filtro permite filtrar apenas o primeiro item associado às células mescladas. Neste artigo, estamos falando sobre como filtrar todos os dados relacionados de células mescladas no Excel.

Mais tutoriais para filtragem de dados ...


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • 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 sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... 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 ...
  • 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...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2021 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos de avaliação gratuita de 30 dias. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • 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
Comentários (15)
Avaliado 4.5 fora do 5 · classificações 1
Este comentário foi feito pelo moderador no site
Presumo que a coluna A seja a coluna de referência com células em negrito. Eu crio um nome "Negrito?" com a referência abaixo =GET.CELL(20,OFFSET(INDIRECT("A1"),ROW()-1,0)) Na coluna B, digito: =Bold? Copie a fórmula e use o filtro automático para filtrar o valor TRUE. FEITO
Este comentário foi feito pelo moderador no site
@Cadafi... isso é brilhante... imaginando como isso funciona!
Este comentário foi feito pelo moderador no site
@cadafi sua fórmula funciona bem, mas não é o uso otimizado ou eficiente dela. Em vez disso, devemos usar referência direta do intervalo ou de uma célula no lugar desse comando de deslocamento completo. Como o seguinte: =GET.CELL(20,'Sheet1'!A1) Copie a fórmula e use o filtro automático para filtrar o valor TRUE. FEITO
Este comentário foi feito pelo moderador no site
@Mohammad Faizan Você está totalmente correto. Obrigado.
Este comentário foi feito pelo moderador no site
Obrigado Mohamand Faizan. Você está inteiramente correto.
Este comentário foi feito pelo moderador no site
Funcionou perfeitamente, obrigado!!! :D :lol:
Este comentário foi feito pelo moderador no site
Simples e brilhante, obrigado!
Este comentário foi feito pelo moderador no site
Oi, estou usando este código e está funcionando bem, mas sempre que clico em cancelar a caixa de diálogo, uma janela pop-up aparece e mostra algum erro. Você pode me dizer como remover esse erro. :Sub FilterBold() Dim myRange As Range Set myRange = Application.InputBox(Prompt:="Selecione um Range", Title:="InputBox Method", Type:=8) myRange.Select Application.ScreenUpdating = False For Each myRange Na Seleção Se myRange.Font.Bold = False Então myRange.EntireRow.Hidden = True End If Next myRange Application.ScreenUpdating = True End Sub
Este comentário foi feito pelo moderador no site
Caro Nitin Jain,

Desculpe responder tão tarde!

Encontramos o problema e já corrigimos. O script VBA no artigo agora está atualizado,

Obrigado pelo seu comentário!
Este comentário foi feito pelo moderador no site
Obrigado por compartilhar. Funciona maravilhoso.
Este comentário foi feito pelo moderador no site
Oi, eu sou um novato em excel completo, eu fiz a seguinte técnica, mas agora preciso copiar os dados que estão em negrito/verdadeiro. Quando eu tentei fazer isso não vai copiar o que está destacado. Alguma ideia de como posso copiar os dados? Obrigado, Ricardo
Este comentário foi feito pelo moderador no site
@RICHARD Você pode fornecer qualquer captura de tela da sua planilha mostrando o que você está exatamente tentando fazer?
Este comentário foi feito pelo moderador no site
Eu usei essa técnica e tive um problema ao tentar copiar os dados em negrito. Ele apenas copia alguns dos dados por algum motivo. Existe alguma maneira de copiar apenas os dados em negrito usando essa técnica? Obrigado, Ricardo
Este comentário foi feito pelo moderador no site
Caro Richard Skins,



Não encontramos o problema como você mencionou. Você poderia fornecer uma captura de tela com detalhes de sua operação?



Obrigado pelo seu comentário!
Este comentário foi feito pelo moderador no site
Obrigado pela fórmula.. ajudou
Avaliado 4.5 fora do 5
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL