Vai al contenuto principale

Come rinominare i fogli in base ai valori delle celle (dall'elenco) in Excel?

Autore: Kelly Ultima modifica: 2023-11-17

La ridenominazione di un singolo foglio di lavoro in Excel viene in genere eseguita facendo clic con il pulsante destro del mouse sulla scheda del foglio e scegliendo "Rinomina" dal menu contestuale. Tuttavia, se devi rinominare più fogli di lavoro utilizzando i valori di celle specifiche o desideri nominare dinamicamente un foglio di lavoro in base al valore di una cella specifica, puoi utilizzare diversi metodi. Questo articolo ti guiderà attraverso queste tecniche, rendendo il processo semplice ed efficiente.


Rinominare dinamicamente un foglio dal valore della cella con VBA

Possiamo rinominare dinamicamente un foglio di lavoro dal valore di una determinata cella con VBA in Excel e puoi procedere come segue:

Passo 1: Fare clic con il tasto destro sul nome del foglio di lavoro a cui verrà assegnato un nome dinamico in base al valore della cella e selezionare Visualizza codice dal menu di scelta rapida.

Passo 2: In apertura Microsoft Visual Basic, Applications Edition finestra, incolla il seguente codice VBA nella finestra del modulo.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End Sub

Mancia: Questo VBA rinomina dinamicamente il foglio di lavoro in base al valore nella cella A1, puoi modificare "A1" in altre celle in base alle tue esigenze.

Passo 3: Salva il codice VBA e chiudi il file Microsoft Visual Basic per l'applicazione finestra.

Quindi vedrai che il nome del foglio viene modificato dinamicamente in base al valore della cella specificato.

Note:

  • Se la cella specificata è vuota, il foglio di lavoro non verrà rinominato.
  • Il foglio di lavoro verrà rinominato ogni volta che si modifica il valore nella cella specificata.
  • Se digiti caratteri speciali nella cella specificata, come *, verrà visualizzato un avviso di errore.

Rinominare più fogli in base ai valori delle celle nei fogli corrispondenti

Il metodo sopra descritto consente di rinominare un foglio alla volta. Tuttavia, utilizzando il file Rinomina più fogli di lavoro caratteristica di Kutools for Excel, puoi rinominare rapidamente tutti o più fogli in base al valore di una cella specificata in ciascun foglio corrispondente. Ad esempio, puoi rinominare ciascun foglio in modo che corrisponda al valore trovato nella cella A1 di quel particolare foglio.

Kutools for Excel - Ricco di oltre 300 strumenti essenziali per Excel. Goditi una prova GRATUITA di 30 giorni con tutte le funzionalità senza carta di credito richiesta! Scaricare ora!

  1. Clicchi Kutools Plus > Foglio di lavoro > Rinomina fogli di lavoro. Vedi screenshot:
  2. In apertura Rinomina più fogli di lavoro finestra di dialogo, eseguire le seguenti operazioni:
    1. Nel Fogli di lavoro list, controlla i fogli di lavoro che rinominerai.
    2. Nel Rinomina opzioni sezione, controlla il Sostituisci il nome del foglio originale opzione.
    3. Nel Nuovo nome del foglio di lavoro sezione, controlla il file Rinomina i fogli di lavoro con una cella specifica opzione e specifica la cella con il cui contenuto rinominerai il foglio corrispondente.
    4. Clicca su Ok pulsante.

E ora tutti i fogli selezionati vengono rinominati in base alla cella specificata di ciascun foglio. Vedi schermata:

Nota: Vuoi accedere a Rinomina più fogli di lavoro caratteristica? Scaricamento Kutools for Excel Ora! Oltre a ciò, Kutools vanta una miriade di oltre 300 altre funzionalità e offre una prova gratuita di 30 giorni. Non aspettare, provalo oggi!


Rinominare più fogli dall'elenco specificato

Kutools per Excel Rinomina più fogli di lavoro la funzionalità supporta anche la ridenominazione di più fogli in base ai valori delle celle in un elenco specificato.

Kutools for Excel - Ricco di oltre 300 strumenti essenziali per Excel. Goditi una prova GRATUITA di 30 giorni con tutte le funzionalità senza carta di credito richiesta! Scaricare ora!

  1. Clicchi Kutools Plus > Foglio di lavoro > Rinomina fogli di lavoro.
  2. In apertura Rinomina più fogli di lavoro finestra di dialogo, configurare come segue:
    1. Nel Fogli di lavoro elenco, seleziona i fogli di lavoro che rinominerai.
    2. Nel Rinomina opzioni sezione, controlla il Sostituisci il nome del foglio originale opzione.
    3. Nel Nuovo nome del foglio di lavoro sezione, controlla il Dalla gamma specifica opzione e fare clic su  pulsante per aprire il secondo Rinomina più fogli di lavoro finestra di dialogo (vedere lo screenshot a destra). Quindi, seleziona l'elenco di celle che rinominerai in base ai relativi valori e fai clic su OK pulsante.
    4. Clicca su Ok pulsante per applicare la ridenominazione.

Quindi vedrai tutti i nomi dei fogli di lavoro selezionati sostituiti con i valori delle celle nell'elenco specificato. Vedi lo screenshot qui sotto:

Nota: Vuoi accedere a Rinomina più fogli di lavoro caratteristica? Scaricamento Kutools for Excel Ora! Oltre a ciò, Kutools vanta una miriade di oltre 300 altre funzionalità e offre una prova gratuita di 30 giorni. Non aspettare, provalo oggi!


Demo: fogli dei nomi basati sui valori delle celle (dall'elenco) in Excel


Kutools for Excel: Oltre 300 strumenti utili a portata di mano! Inizia oggi la tua prova gratuita di 30 giorni senza limitazioni di funzionalità. Scarica ora!

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 strumenti12 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 (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi there, one question if i want to use the value of 2 cells (A1 & B1) what i have to change?
This comment was minimized by the moderator on the site
Hi there,

Please try the code below:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim sheetName As String
    
    If Not Intersect(Target, Me.Range("A1:B1")) Is Nothing Then
        sheetName = VBA.Left(Me.Range("A1").Value & Me.Range("B1").Value, 31)
        
        If sheetName <> "" Then
            Application.ActiveSheet.Name = sheetName
        End If
    End If
End Sub

Once you done pasting the code to the View Code window, please select the cell A1 or B1 to make the code run.

Amanda
This comment was minimized by the moderator on the site
Здравствуйте! Подскажите, пожалуйста, а как в Excel создать левую панель, в которой разместить названия листов? То есть перенести ярлыки листов влево (сейчас то они снизу)
This comment was minimized by the moderator on the site
This comment was minimized by the moderator on the site
I used the dynamic sheet name coding and functionally it works well, but I get the Runtime Error 1004 whenever I click inside a cell. Anyone have any info on how to correct this?


Thanks
This comment was minimized by the moderator on the site
This is awesome, thank you so much....
This comment was minimized by the moderator on the site
so I am trying to do this, but nothing is happening - my sheet names aren't changing, everything is the exact same. Do you know what I am doing wrong??
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations