Como filtrar dados que contêm hiperligações no Excel?
No Excel, pode filtrar dados por texto, número, cor da fonte ou cor de fundo — mas já alguma vez tentou filtrar todos os dados que contêm hiperligações numa coluna, como ilustrado na captura de ecrã abaixo? Neste artigo, apresento-lhe um código VBA para filtrar rapidamente e exibir apenas as linhas com hiperligações no Excel.
 |  |  |
Filtrar dados com hiperligações
Filtrar dados com hiperligações
1. Prima Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e copie e cole o código seguinte na janela do Módulo.
VBA: Filtrar dados com hiperligações
Sub HyperPicker()
'UpdatebyExtendoffice20180404
Dim xRg As Range
Dim xCell As Range
On Error Resume Next
Set xRg = Application.InputBox("Select a column:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xCell.Hyperlinks.Count = 0 Then
xCell.EntireRow.Hidden = True
End If
Next
End Sub
3. Prima a tecla F5 para selecionar uma coluna a filtrar.
4. Clique em OK e apenas as hiperligações serão apresentadas.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos