Definir Nomes - Exclusão

Question

Pessoal,

No menu "Inserir", há a opção "Nomes", "Definir", como todos sabem( e o próprio nome diz), podemos nomear uma célula para que agilizar a referencia a célula ou intervalo utilizando o nome proposto.

Infelizmente, muitas pessoas abusam desta "facilitação" do excel, e por vezes, encontramos planilhas que estão com muitos intervalos nomeados, muitos nem contém mais as referencias das celulas, uma vez que planilhas foram removidas desde a criação do arquivo.

Pois bem, gostaria de saber se há uma maneira mais fácil de excluir  todos os intervalos nomeados de uma planilha. Hoje tenho feito "nome a nome" e isto é muito moroso.

Desde já agradeço a atenção de voces.

[]'s

Dan BH/MG

---

Dan - BH/MG - Brasil - [e-mail]

Answer 1

Clique no canto esquerdo superior da planilha , onde aparecem os nomes dos intervalos, escolha um a um e delete... assim não precisa fazer o caminho todo Nomes... Inserir e etc....

Answer 2

Bacana, Diogo. Um a um é tranquilo nos nomes que tem a referencia no arquivo... mas e os nomes que estao definidos e não estão no arquivo?

Obrigado, mas não atende....

---

Dan - BH/MG - Brasil - [e-mail]

Answer 3

Você pode realizar via código:

Sub ApagarNomes()
For Each NomeIntervalo In ThisWorkbook.Names
NomeIntervalo.Delete
Next
End Sub

[ ]s

---

Adilson Soledade - MOS http://adilsonsoledade.blogspot.com/

Answer 4

Adilson,

Boa saída, não sabia como fazer isto..

Porém, ocorreu problema quando o intervalo nomeado não esta na planilha:

"Erro em tempo de execução '1004': Este nome não é válido"

Será tem como fazer via código pagar estes "lixos"?

Obrigado pela ajuda.

---

Dan - BH/MG - Brasil - [e-mail]

Answer 5

Adilson,

coloquei o On Error Resume Next e a maioria dos nomes foram embora! Excelente!!

Obrigado

código final ficou:

Sub ApagarNomes()
On Error Resume Next
For Each NomeIntervalo In ThisWorkbook.Names
    NomeIntervalo.Delete
Next
End Sub

 

---

Dan - BH/MG - Brasil - [e-mail]