Vai al contenuto principale

Come eliminare rapidamente tutti gli intervalli denominati in Excel?

Supponendo che tu abbia creato molti intervalli denominati nella tua cartella di lavoro, ma ora, non hai più bisogno di questi intervalli denominati, come potresti rimuovere tutti gli intervalli denominati contemporaneamente in Excel?

Elimina tutti gli intervalli denominati accedendo a Gestione nomi

Nella finestra di dialogo Gestione nomi, puoi creare, modificare ed eliminare gli intervalli denominati come desideri. Per favore, fai come segue:

1. Vai al Nome Manager cliccando Formula > Nome Manager, vedi screenshot:
doc-delete-named-range1

2. Nel Nome Manager dialogo, premere Shift per selezionare tutti gli intervalli denominati o tenere premuto il tasto Ctrl tasto per selezionare quelli che non ti servono, vedi screenshot:
doc-delete-named-range1

3. E poi clicca Elimina nella parte superiore della finestra di dialogo e verrà visualizzata una finestra di messaggio per ricordarti se sei sicuro di eliminare i nomi.
doc-delete-named-range1

4. Quindi fare clic OK, tutti gli intervalli denominati sono stati eliminati contemporaneamente.

doc-delete-named-range4 -2 doc-delete-named-range5

Trova e sostituisci tutti gli intervalli denominati con i riferimenti di cella corrispondenti nelle formule

Kutools per Excel Sostituisci nomi intervallo l'utility è in grado di trovare facilmente tutte le formule che applicano intervalli denominati in un intervallo selezionato, un foglio specificato o tutti i fogli. E il ruolo principale di questa utilità è sostituire tutti gli intervalli denominati con i riferimenti di cella corrispondenti in queste formule.

Ottieni subito una prova gratuita completa di 30 giorni!

annuncio sostituire intervallo denominato 1

Kutools for Excel - Potenzia Excel con oltre 300 strumenti essenziali. Goditi una prova GRATUITA di 30 giorni con tutte le funzionalità senza carta di credito richiesta! Get It Now

Elimina tutti gli intervalli denominati con il codice VBA

Il seguente codice VBA breve può anche aiutarti a rimuovere tutti gli intervalli denominati nella cartella di lavoro.

1. Tieni premuto il ALT + F11 chiavi e apre il file Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: elimina tutti gli intervalli denominati in Excel

Sub DeleteNames()
'Update 20140314
Dim xName As Name
For Each xName In Application.ActiveWorkbook.Names
    xName.Delete
Next
End Sub

3. Quindi premere F5 chiave per eseguire questo codice, tutti i nomi nella cartella di lavoro verranno rimossi immediatamente.

Articoli correlati:

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli  |   VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule   |  Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle   |  Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti:  12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione

Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
Comments (8)
Rated 4.5 out of 5 · 1 ratings
keenimo
keenimo
This comment was minimized by the moderator on the site
first if the excel extension is xls then convert it using excel to xlsx .then close excel. make a backup of your xlsx file. rename this backup extension to zip. under zip file there is a xl folder.under the xl folder there is a workbook.xml file. open it with xml notepad and delete defined names. or open it with notepad delete between <definednames> to </definednames>. and also delete this definednames parts too.then save this workbook.xml and drag drop inside zip files xl folder . then save it. and change the extension to xlsx file. open the file and press Ctrl+S. All defined names cleared with hidden ones.
Reply
0
0
Rated 4.5 out of 5
lidwyn
lidwyn
This comment was minimized by the moderator on the site
You should check if it is an internal protected name range like so
```
Sub DeleteNames()
Dim xName As Name
For Each xName In Application.ActiveWorkbook.Names
If Split(xName.Name, ".")(0) <> "_xlfn" Then
xName.Delete
End If
Next
End Sub
```
Reply
0
0
John Galaska
John Galaska     lidwyn
This comment was minimized by the moderator on the site
This was an improved code from the prior. I had many names for which the delete button was dimmed out, wouldn't work, nor would the prior code. Yours removed all but one. Thank you!!
Reply
0
0
lidwyn
lidwyn     lidwyn
This comment was minimized by the moderator on the site 

Sub DeleteNames()
    Dim xName As Name
    For Each xName In Application.ActiveWorkbook.Names
        If Split(xName.Name, ".")(0) <> "_xlfn" Then
            xName.Delete
        End If
    Next
End Sub
Reply
0
0
Murali
Murali
This comment was minimized by the moderator on the site
Run Time Error 7
out of memory
Reply
0
0
skyyang
skyyang     Murali
This comment was minimized by the moderator on the site
Hello, Murali
I have tested the code, it works well in my workbook.
Could you upload your workbook here, so that we can check where the problem is?

Thank you!
Reply
Report
0
0
Ron S
Ron S
This comment was minimized by the moderator on the site
How about something a little more specific.

First Identify all unused named ranges, for review.

Second, macro to delete all unused named ranges.
Reply
0
0
Brendan
Brendan
This comment was minimized by the moderator on the site
When I try to run the above VBA Code, I get the following error:

Run-time error '1004'
The syntax of this name isn't correct.

Verify that the name:
- Starts with a letter or underscore
- Doesn't include a space or character that isn't allowed
- Doesn't conflict with an existing name in the workbook
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations