Boa tarde And Oliver

Temos muitos colegas que podem te ajudar, mas para facilitar sugiro que vc anexe a tua planilha Zipada.

Um abraço

Uma vez que não colocou a rotina que está usando, suponho que o erro ocorre por causa do Selection, para evitar o erro o cursor tem de estar em uma celula que contenha os dados, se estiver em uma celula vazia fora de uma lista ocorrerá o erro.
Suponddo que está colando os dados em "A1", utilize antes do Selection.Autofilter, Range("A1").select.

Faça os testes e retorne.

[]s

PATROPI, MAURO, muito obrigado por responderem, a rotina é simples baixo um arquivo FTP com aproximadamente 10.000 nomes, faço uma procv para achar os operadores, supervisores e suas respectivas células, filtro diferente de #N/D por ser mais prático, colo tudo em uma outra planilha... tentei gravar uma macro so que apresenta o erro:
Selection.AutoFilter
ActiveSheet.Range("$A$1:$T$9702").AutoFilter Field:=7, Criteria1:="<>#N/D" _
, Operator:=xlAnd
Amanhã eu disponibilizo a planilha, espero que tenha conseguido explicar.
E muito obrigado.

Oliver,
Como o erro "#N/D" é retornado pela função PROCV, esse tipo de erro não é reconhecido para ser capturado pelo VBA, você tem de usar "#N/A".

Altere em sua rotina a variavel erro :

ActiveSheet.Range("$A$1:$T$9702").AutoFilter Field:=7, Criteria1:="<>#N/A" _
, Operator:=xlAnd
Faça os testes, e se não resolver anexe um exemplo.

[]s

Valeu Mauro .
Vou tentar.
Obrigado

Não funcionou.
Disponibilizei uma parte, alias só a parte que apresenta o erro, como expliquei anteriormente, o que eu preciso seria filtrar os diferentes de #N/D e colar na planilha 2, eu queria automatizar porque tem varios passos, depois busco contrato, horario de contato e etc, o restante ta ok o meu unico problema e este filtro.
Desde já muito obrigado.

http://www.4shared.com/account/file/nFm ... LTRAR.html

Oliver, aqui no serviço não temos acesso ao 4shared, Blogs ou qq outro tipo de site de drive virtual. A noite baixo o arquivo e dou uma olhada, se até lá não surgir alguma solução.

[]s

Oliver, como eu disse anteriormente no VBA temos de trocar o #N/D por #N/A, no modelo anexo o FILTRO ESTÁ SENDO APLICADO nas Colunas A;B e C, com o critério " <> #N/D (Field:=3) Coluna 3 = C ".
Sendo assim, como temos os Erros (#N/D) em algumas Colunas, mas não em todas as LINHAS, um exemplo é a Linha n° 6545 aonde nas Colunas A e B temos o Erro e em C6545 NÃO, estes continuarão a aparecerem nas Clounas A e B.

Faça os testes, e se for isso, seguiremos para a proxima questão.

[]s

MAURO

OBRIGADO VOU DAR UMA OLHADA

VALEU

MAURO.

Funcionou valeu mesmo obrigado pela paciência e pelas explicações
ja apliquei em outras planilhas e também deram certo

vou deixar colado aqui a resolução caso alguém tenha a mesma duvida que eu

Sub Ranking ()
'Selection.AutoFilter

ActiveSheet.Range("$A$1:$C$9702").AutoFilter Field:=3, Criteria1:="<>#N/A" _
, Operator:=xlAnd

End Sub