Este fórum está sendo desativado

[gsinhorini]

Olá Muito bom dia!
Sou novo com vba, comecei não tem 2 meses. Estou desenvolvendo uma planilha totalmente mecanizada onde o usuário clica nos botões e executa os procedimentos.
Eu estou com um problema, estou fazendo um filtro para procurar alguns pedidos que estão com o status executados, nessa parte está tudo certo o problema é quando o filtro retorna em branco, eu preciso avisar ao usuario que não existe pedidos executado. Já tentei varia coisas mas nada deu certo, será que alguém pode me ajudar?
Abaixa é o código que estou utilizando.

Código: Selecionar todos

ActiveSheet.Range("$C$1:$BK" & UltimaLinhaBD).AutoFilter Field:=61, Criteria1:="SERVIÇO EXECUTADO"
    
    If Not ActiveSheet.Range("$C$1:$BK$" & UltimaLinhaBD).AutoFilter(Field:=61, Criteria1:="SERVIÇO EXECUTADO") = True Then
        MsgBox "Não Existe Peido em Execução"
        If ActiveSheet.AutoFilterMode Then ActiveSheet.AutoFilterMode = False
        Sheets("Pedidos_Executados").Select
    Else

Muito obrigado pela ajuda.

Atenciosamente
Guilherme Sinhorini

[alexandrevba]

Bom dia!!

Eu recomendo que você poste seu arquivo modelo contendo os dados de exemplo e o código que está usando.

Para anexar um arquivo, click em responder, na parte de baixo tem Opções e Adicionar um anexo, click em Adicionar um anexo, escolha o arquivo.

Att

[gsinhorini]

Olá Alexandre, muito bom dia!
Eu fiz uma outra validação no código e funcionou.
Eu queria saber se tem como verificar se o AutoFilter está como vazio facilitaria.

Muito obrigado pela ajuda.

[alexandrevba]

Boa tarde!!

Tente usar o debug.
Use uma célula ou uma Msgbox para mostrar o resultado!!
https://usuariosdoexcel.wordpress.com/2013/08/12/0197/
http://www.excel-easy.com/vba/examples/debugging.html

Att