Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Eliminare nomi da foglio

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Eliminare nomi da foglio

Postdi blunotte13 » 12/04/20 22:17

Buonasera e auguri a tutti.
Nella mia cartella di lavoro uso i nomi per definire gli intervalli da cui creo elenchi tramite convalida dati. I nomi ci sono in diversi fogli, in un foglio in particolare i nomi degli intervalli devo cambiarli spesso, la macro per crearli l'ho registrata e funziona, vorrei un macro per cancellare i nomi solo in un foglio.
In rete ho trovato questa da un noto sito su excel
Codice: Seleziona tutto
Sub EliminaNomi()
Dim G, X As Integer
X = ActiveWorkbook.Names.Count
For G = X To 1 Step -1     
ActiveWorkbook.Names(G).Delete   
Next
End Sub

Questa macro però cancella tutti i nomi della cartella, ho provato a cambiare ActiveWorkbook con ActiveSheet ma non funziona, si può fare, avete suggerimenti ?
Grazie a tutti.
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 136
Iscritto il: 13/01/10 19:35

Sponsor
 

Re: Eliminare nomi da foglio

Postdi Anthony47 » 12/04/20 23:54

Ho modificato la tua macro come segue:
Codice: Seleziona tutto
Sub EliminaNomiB()
Dim G, X As Integer
X = ActiveWorkbook.Names.Count
'
Sheets("Foglio3").Select            '<<< Il foglio i cui Nomi vanno cancellati  -  VEDI NOTA
For G = X To 1 Step -1
    If Left(Replace(Mid(Names(G).RefersTo, 2), "'", "", , , vbTextCompare), Len(ActiveSheet.Name)) = ActiveSheet.Name Then
        Debug.Print "Delete: " & Names(G).Name
        ActiveWorkbook.Names(G).Delete
    End If
Next G
End Sub

Il concetto e' che dei "Nomi" va esaminato l'area a cui si riferiscono ed eliminare quelli che si riferiscono a uno specifico foglio

Se vuoi indicare nel codice quale e' il foglio da cui cancellare, allora modifica di volta in volta l'istruzione marcata <<<; oppure puoi cancellare quella istruzione e la macro cancellera' i Nomi che si riferiscono al foglio "corrente".

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 17003
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Eliminare nomi da foglio

Postdi blunotte13 » 13/04/20 10:40

Grazie dell'aiuto, guardando la tua modifica non sarei mai stato capace di scriverla così.
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 136
Iscritto il: 13/01/10 19:35


Torna a Applicazioni Office Windows


Topic correlati a "Eliminare nomi da foglio":


Chi c’è in linea

Visitano il forum: Nessuno e 18 ospiti