Filtrar uma planilha através de um hiperlink clicado em outra planilha.

renan.apgomes · 26 de setembro de 2016

Olá Pessoal.

Vocês podem me ajudar sobre qual função em VBA usar para que quando clicar em um nome em uma "planilha A" possa me remeter a uma "planilha B" já filtrada com o nome que cliquei anteriormente.

Segue a planilha:

https://www.sendspace.com/file/nba7a4

Agradeço desde já.

Basole · 26 de setembro de 2016

Veja se é isso que precisa:

Teste-filtro.zip

renan.apgomes · 27 de setembro de 2016

Obrigado,é isso sim...

Mas seria o inverso,clicando na planilha cronograma me levaria para o filtro de codigos.

Basole · 27 de setembro de 2016

Segue com as alteracoes:

Teste-filtro_2.zip

DJunqueira · 27 de setembro de 2016

Ainda q eventualmente não seja o q o renan.apgomes quer, mas no intuito de enriquecer a discussão, uma alternativa com Autofiltro...

Teste-filtro.zip

renan.apgomes · 27 de setembro de 2016

Obrigado,

Como posso deixar fixo para hiperlink só uma coluna.

Seria trocando o LR?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim LR As Long
Sheets("Agrícola").Select
LR = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
ActiveSheet.Range("A1").Activate
Selection.AutoFilter
ActiveSheet.Range("$A$1:$A$" & LR).AutoFilter Field:=1, Criteria1:=Target.Value
End Sub

Basole · 27 de setembro de 2016

Limitado somente a coluna "A" (1)


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim LR As Long

    If Target.Count > 1 Then Exit Sub
    If Target.Column = 1 Then
        Sheets("Agrícola").Select
        LR = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
        ActiveSheet.Range("A1").Activate
        Selection.AutoFilter
        ActiveSheet.Range("$A$1:$A$" & LR).AutoFilter Field:=1, Criteria1:=Target.Value
    End If
End Sub