Página 1 de 1

VBA - Procurar outros dados

Enviado: 22 Out 2018 às 09:06
por Lahel
Bom dia a todos, estou com essa planilha em anexo, ela já está procurando o nome dos funcionários porem queria outros dados como:
Ao digitar Valido filtrar todos os ASO Valido
Ao digitar Vencido filtrar todos os ASO Vencido
Ao digitar Prazo filtrar todos os ASO com Prazo
Ja tentei porem eu não consigo fazer.
Att.

Re: VBA - Procurar outros dados

Enviado: 22 Out 2018 às 11:49
por babdallas
Veja se é o que deseja.

VBA - Procurar outros dados

Enviado: 24 Out 2018 às 08:11
por Lahel
Ficou perfeito, só que o msg box parou de funcionar

Re: VBA - Procurar outros dados

Enviado: 24 Out 2018 às 08:20
por babdallas
Desculpe, mudei o codename da planilha e esqueci de mudar o evento de abertura da pasta de trabalho. Modifique o seguinte:
Código: Selecionar todos
'#### Planilhas
Private Sub Workbook_Open()
    Dim W As Worksheet
    Dim WRows As Long
    
    Set W = wshASO 'Esta foi a linha de código que modifiquei
    For WRows = 9 To W.Range("A" & Rows.Count).End(xlUp).Row
        If W.Cells(WRows, 8).Value <> "Valido" Then
            MsgBox "O ASO DE" & " " & W.Cells(WRows, 1).Value & Chr(13) & Chr(13) & W.Cells(WRows, 8).Value
        End If
    Next WRows
End Sub

VBA - Procurar outros dados

Enviado: 24 Out 2018 às 12:47
por Lahel
Muito obrigado, parabéns pela proatividade em ajudar os demais.