bom dia,
segue a macro:

Sub DeleteIntervalosNomes()
' * essa macro deleta todos interalos da pasta de trabalho 
   Dim wb As Workbook
    Dim nN As Name

    Set wb = ActiveWorkbook

    For Each nN In wb.Names
        nN.Delete
    Next nN

End Sub

ERRO 400 ?

O que significa ?

ERRO 400 ?
O que significa ?

Somente por erro 400 pode ser varias coisas, mas se for referente a rotina do basole, ela está correta, informe como e onde esta executando a rotina.

Beleza,

O erro é apresentado no trecho "nN.Delete", algo relacionada a declaração de objeto.

Se puder postar sua planilha ou um modelo, fica mais facil investigar como disse o mauro pode ser varias coisas eh dificil opnar por suposicoes.

Bom

Nesse meio tempo acabei por resolver o problema com uma solução "caseira". Em todo caso agradeço pela ajuda. É possível que haja alguma particularidade na planilha, mas devido a restrições da empresa onde trabalho não seria possível enviar ao menos uma cópia.

Muito obrigado.