Excluir nomes de intervalos via VBA

Pessoal,
Automatizei uma planilha que importa automaticamente arquivos em txt. Descobri que ao fazer isso são criados os nomes dos intervalos no qual os dados são inseridos na planilha.
Quero excluir estes nomes via códio mas não estou conseguindo.
Estou utilizando o seguinte comando.

ActiveWorkbook.names("NomeDoIntervalo").Delete

mas dá erro.

Boa tarde!!

Dica com detalhes oque está de errado

Código:

Option Explicit
 
Sub Delete()
   
    Dim nm              As Name
   
    On Error Resume Next
    For Each nm In ActiveWorkbook.Names
        nm.Delete
    Next
    On Error Goto 0
   
End Sub
 

alexandrevba escreveu:

Boa tarde!!

Dica com detalhes oque está de errado

Código:

Option Explicit
 
Sub Delete()
   
    Dim nm              As Name
   
    On Error Resume Next
    For Each nm In ActiveWorkbook.Names
        nm.Delete
    Next
    On Error Goto 0
   
End Sub
 

Boa tarde.

Está aparecendo o erro Uso inválido da prorpiedade.

Bom dia!!

Deposite seu arquivo em um site gratuito e nos mande o link!

Att

Alexandre,
Consegui excluir os nomes, mas este código exclui todos os intervalos nomeados. Tem como fazer para que alguns nomes não sejam excluídos?

Bom dia!!

me mande seu código, e descreva o qual os nomes que pretende excluir.

Att

alexandrevba escreveu:

Bom dia!!

me mande seu código, e descreva o qual os nomes que pretende excluir.

Att

Alexandre,

Não tenho código. Esse código é que preciso. Os nomes que desejo excluir são nomes automáticos que são criados quando importo um arquivo txt. Então são criados os nomes, como por exemplo:

Importacao_dados_1
Importacao_dados_2
Importacao_dados_3
Importacao_dados_4
Importacao_dados_5
.
.
e assim por diante

Boa noite!!

Me mande o arquivo.


Att

Estou com o mesmo problema, qual é a solução para apagar apenas um determinado nome pela macro?

obrigado a quem puder ajudar.

Leandro