Come rinominare i fogli di lavoro in base ai valori delle celle in Excel?
La rinomina dei fogli di lavoro è un’operazione comune quando si lavora con Excel, ma hai mai provato a rinominare i fogli in base ai valori delle celle? Certo, puoi farlo manualmente, ma questa guida ti svela alcuni trucchi per rinominare rapidamente più fogli contemporaneamente utilizzando i valori delle celle, risparmiandoti tempo prezioso.
Rinomina fogli di lavoro in base a una cella specifica con VBA
Rinomina fogli di lavoro in base a una cella specifica con Rinomina batch fogli di lavoro 
Rinomina fogli di lavoro in base a un intervallo di contenuti delle celle con Rinomina batch fogli di lavoro
Rinomina fogli di lavoro in base a una cella specifica con VBA
Grazie a questa macro VBA, puoi rinominare automaticamente il foglio corrente in base al contenuto di una cella specifica.
1. Seleziona la cella su cui desideri basare il nuovo nome del foglio; in questo caso, scegli la cella A1. Vedi screenshot:
2. Premi i tasti Alt + F11 per aprire la finestra di Microsoft Visual Basic, Applications.
3. Fai clic su Inserisci > Modulo, quindi incolla il seguente codice VBA nella nuova finestra del Modulo.
VBA: Rinomina i fogli di lavoro in base al valore contenuto in una cella specifica.
Sub RenameSheet()
'UpdatebyKutools20191129
Dim xWs As Worksheet
Dim xRngAddress As String
Dim xName As String
Dim xSSh As Worksheet
Dim xInt As Integer
xRngAddress = Application.ActiveCell.Address
On Error Resume Next
Application.ScreenUpdating = False
For Each xWs In Application.ActiveWorkbook.Sheets
xName = xWs.Range(xRngAddress).Value
If xName <> "" Then
xInt = 0
Set xSSh = Nothing
Set xSSh = Worksheets(xName)
While Not (xSSh Is Nothing)
Set xSSh = Nothing
Set xSSh = Worksheets(xName & "(" & xInt & ")")
xInt = xInt + 1
Wend
If xInt = 0 Then
xWs.Name = xName
Else
If xWs.Name <> xName Then
xWs.Name = xName & "(" & xInt & ")"
End If
End If
End If
Next
Application.ScreenUpdating = True
End Sub4. Premi il tasto F5 per eseguire il codice VBA. Tutti i fogli di lavoro verranno rinominati in base ai rispettivi valori della cella A1.
Rinomina fogli di lavoro in base a una cella specifica con Rinomina batch fogli di lavoro
Se disponi di Kutools per Excel, non devi salvare il codice VBA: puoi usare la funzione Rinomina batch fogli di lavoro per rinominare rapidamente tutti i fogli in base al contenuto delle rispettive celle.
Dopo aver installato gratuitamenteKutools per Excel, procedi come segue:
1. Apri la cartella di lavoro i cui fogli desideri rinominare.
2. Fai clic su KUTOOLS PLUS > Foglio di lavoro > Rinomina fogli di lavoro. Vedi screenshot:
3. Nella finestra di dialogo visualizzata, seleziona i fogli da rinominare nel riquadro Fogli di lavoro, scegli una delle opzioni di Rinomina disponibili – in questo caso sostituirò il nome del foglio – quindi seleziona Dalla cella del foglio di lavoro corrispondente e indica la cella da utilizzare per la rinomina. Vedi screenshot:
4. Fai clic su OK. I fogli sono ora rinominati in base al contenuto della cella specificata.
A volte, tuttavia, potresti dover rinominare più fogli di lavoro in base a un intervallo di valori delle celle, come mostrato nello screenshot seguente. In tal caso, puoi utilizzare il metodo descritto di seguito.
Rinomina fogli di lavoro in base a un intervallo di contenuti delle celle con Rinomina batch fogli di lavoro
Con lo strumento Rinomina batch fogli di lavoro di Kutools per Excel, puoi rinominare i fogli in base a un intervallo selezionato.
Dopo aver installato gratuitamenteKutools per Excel, procedi come segue:
1. Fai clic su KUTOOLS PLUS > Foglio di lavoro > Rinomina fogli di lavoro. Vedi screenshot:
2. Nella finestra di dialogo Rinomina batch fogli di lavoro, configura le impostazioni come segue:
(1) Seleziona i fogli di lavoro da rinominare da Elenco dei fogli di lavoro;
(2) Seleziona l'opzione Dalla selezionee indica i valori delle celle da utilizzare per la rinomina;
(3) Specifica lo Stile di rinomina: puoi selezionare Inserisci prima del nome originale, Inserisci dopo il nome originale oppure Sostituisci il nome originale e visualizzare in anteprima il risultato corrispondente nella finestra di dialogo.
3. Fai clic su OK; vedrai che tutti i fogli di lavoro selezionati sono stati rinominati in base ai valori delle celle specificati.
Sostituisci il nome originale
Inserisci prima del nome originale
Inserisci dopo il nome originale
Con lo strumento Rinomina fogli di lavoro, puoi anche Rinomina fogli di lavoro aggiungendo un prefisso o un suffisso specifico.Fai clic qui per saperne di più su Rinomina batch fogli di lavoro.
Rinomina più fogli in base ai valori delle celle
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- 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 all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi