Página 1 de 1

Validação de Filtro existente VBA

Enviado: 01 Set 2015 às 21:42
por jpmcvs
Boa Noite,
Possuo uma macro onde são feitas diversas validações, no final, são aplicadas algumas condições em filtro dependendo da seleção do usuário, o que pode ocorre é que o filtro seja removido manualmente e a macro não seja executada devido a ausência do filtro, logo preciso de uma linha lógica onde será validada a existência do filtro, e se ele não existir que seja configurado antes da aplicação dos filtros, consegui algumas coisas, mas nenhuma funcionou, não consegui fazer a macro enxergar se existe filtro ou não, ela sempre remove o filtro se ele existe e insere se não.

Re: Validação de Filtro existente VBA

Enviado: 02 Set 2015 às 08:01
por Henrique
jpmcvs,

Bom dia!

Como sugestão, por que você não refaz o filtro pelo VBA ao invés de testar se ele está ativo ou não. Desta forma teria certeza que o filtro estará ativo e da forma que precisa.

Espero ter ajudado.

Re: Validação de Filtro existente VBA

Enviado: 02 Set 2015 às 10:12
por alexandrevba
Bom dia!!

Tente
Código: Selecionar todos
Sub AleVBA_522()
    If Worksheets("Plan1").FilterMode = True Then
        MsgBox "Filtro ativo"
    Else
        MsgBox "Filtro desativado"
    End If
     
End Sub
Att

Validação de Filtro existente VBA

Enviado: 02 Set 2015 às 13:11
por jpmcvs
Boa Tarde Alexandre, o código funcionou em partes, não sei por qual motivo, mas ele funcionou a partir do momento que eu usei If Not, ao invés de somente usar If, o restante do contexto foi o exato como postou, mito obrigado pelo Auxílio.