como filtrar uma linha usando várias colunas

0

Eu tenho uma planilha aqui com 3 colunas e abaixo de cada coluna muitos textos.

Como posso criar um filtro para encontrar todas as ocorrências de um determinado texto em qualquer uma dessas colunas e mostrar apenas as linhas que o contêm, independentemente da coluna em que foi encontrado.

    
por Ricardo Silva 05.01.2016 / 12:48

1 resposta

1

Ok, o que acabei de fazer foi criar um filtro e uma macro para definir o filtro como o valor de uma determinada célula.

segue o código que eu copiei da internet e alterei um pouco.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim iFilterColumn As Integer
    Dim rFilter As Range
    Dim sCriteria As String
    On Error Resume Next
    With Target
        Set rFilter = .Parent.AutoFilter.Range
        iFilterColumn = .Column + 1 - rFilter.Columns(1).Column
        If Intersect(Target, Range("rCriteria")) Is Nothing Then GoTo Terminator
        Select Case Left(.Value, 1)
        Case ">", "<"
            sCriteria = .Value
        Case Else
            sCriteria = "=*" & .Value & "*"
        End Select
        If sCriteria = "=" Then
            .Parent.Range(rFilter.Address).AutoFilter Field:=iFilterColumn
        Else
            .Parent.Range(rFilter.Address).AutoFilter Field:=iFilterColumn, Criteria1:=sCriteria
        End If
    End With
Terminator:
    Set rFilter = Nothing
    On Error GoTo 0
End Sub
    
por 05.01.2016 / 16:29