Como filtrar dados com hiperlinks no Excel?

No Excel, você pode filtrar dados por determinado texto, número, cor da fonte ou cor de fundo, mas você já tentou filtrar todos os dados com hiperlinks em uma coluna, como mostrado na captura de tela abaixo? Neste artigo, vou apresentar um código VBA para filtrar rapidamente e mostrar apenas as linhas com hiperlinks no Excel.

Filtrar dados com hiperlinks

Filtrar dados com hiperlinks

1. Pressione as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, copie e cole o código abaixo na janela do Módulo.

VBA: Filtrar dados com hiperlinks

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. Pressione a tecla F5 para selecionar uma coluna para filtrar.

4. Clique OK, apenas os hiperlinks serão exibidos.