Vai al contenuto principale

Come creare un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro?

Supponendo che tu abbia una cartella di lavoro con più fogli di lavoro, ora vuoi elencare tutti i nomi dei fogli nella cartella di lavoro corrente, esiste un metodo rapido per creare un elenco di tesi nomi di fogli in Excel senza digitarli uno per uno? Questo tutorial fornisce istruzioni su come elencare i nomi dei fogli di lavoro in Excel.

Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro in modo dinamico con le formule

Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro con una funzionalità utile

Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro con codice VBA


Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro in modo dinamico con le formule

In Excel, puoi definire un nome di intervallo e quindi applicare una formula per elencare tutti i nomi dei fogli dalla cartella di lavoro corrente, eseguire i seguenti passaggi:

1. Vai a fare clic Formula > Nome Manager, vedi screenshot:

2. Nel Nome Manager finestra di dialogo, fare clic New pulsante, vedi screenshot:

3. Nel saltò fuori Nuovo nome finestra di dialogo, specificare un nome nel file Nome casella di testo, quindi copia la formula seguente nel file Si riferisce a casella di testo, vedi screenshot:

=GET.WORKBOOK(1)&T(NOW())

4. Quindi fare clic OK > Chiudi per chiudere le finestre di dialogo, ora, vai su un foglio in cui desideri elencare tutti i nomi dei fogli, quindi inserisci la seguente formula in una cella vuota:

=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")

Note:: Nella formula sopra, Nomi di fogli è il nome dell'intervallo crestato nel passaggio 3.

5. Quindi trascina il quadratino di riempimento sulle celle quando vengono visualizzate celle vuote e ora tutti i nomi dei fogli della cartella di lavoro corrente sono stati elencati come mostrato nell'immagine sottostante:

6. Se desideri creare il collegamento ipertestuale per ogni foglio, utilizza la formula seguente:

=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")

Note:: Nella formula sopra, A2 è la cella che contiene il nome del foglio e A1 è la cella in cui si desidera posizionare la cella attiva. Ad esempio, se fai clic sul testo del collegamento ipertestuale, verrà individuata la cella A1 del foglio.

7. Ora, quando fai clic sul testo del collegamento ipertestuale, ti porterà a quel foglio, vedi la demo di seguito:

Suggerimenti::
  • 1. Con le formule precedenti, i nomi dei fogli creati vengono elencati dinamicamente, quando si modifica il nome del foglio nella cartella di lavoro, il nome del foglio di indice verrà aggiornato automaticamente.
  • 2. È necessario salvare il file come Cartella di lavoro abilitata per Excel formato, se vuoi che le formule funzionino bene dopo che il file è stato chiuso e riaperto.

Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro con una funzionalità utile

Grazie alla Crea un elenco di nomi di fogli utilità del componente aggiuntivo di terze parti Kutools for Excel, puoi creare un elenco di nomi di fogli di lavoro con un clic e collegarti a ciascun foglio di lavoro con collegamento ipertestuale.

Nota:Per applicare questo Crea un elenco di nomi di fogli, in primo luogo, dovresti scaricare il file Kutools for Excele quindi applica la funzione in modo rapido e semplice.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Clicchi Kutools Plus > Foglio di lavoro > Crea un elenco di nomi di fogli, vedi screenshot:

2. Nel Crea un elenco di nomi di fogli finestra di dialogo, specificare le seguenti impostazioni:

(1.) Scegli stili di indice del foglio ti piace, puoi creare i nomi dei fogli di lavoro con collegamenti ipertestuali o con pulsanti macro.

(2.) Immettere i nomi del foglio di lavoro per l'indice del foglio.

(3.) Specificare la posizione dell'indice del foglio di lavoro.

(4.) Specificare quante colonne si desidera utilizzare nel nuovo foglio di lavoro per visualizzare i nomi del foglio di lavoro.

3. Dopo aver terminato le impostazioni, fare clic su OK. Tutti i nomi dei fogli di lavoro sono stati elencati con collegamenti in un nuovo foglio di lavoro della cartella di lavoro corrente. Vedi screenshot:

nomi di fogli di lavoro con collegamenti ipertestuali nomi di fogli di lavoro con pulsanti macro
Consiglio: per utilizzare questa funzione è necessario installare Kutools for Excel prima, per favore fare clic per scaricare e avere una prova gratuita di 30 giorni ora.

Ottieni un elenco di tutti i nomi dei fogli di lavoro da una cartella di lavoro con codice VBA

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

2. Clic inserire > Modulie incolla la seguente macro nel file Moduli Finestra.

VBA: elenca tutti i nomi dei fogli di lavoro con collegamenti ipertestuali in un nuovo foglio di lavoro:

Sub CreateIndex()
'updateby Extendoffice
    Dim xAlerts As Boolean
    Dim I  As Long
    Dim xShtIndex As Worksheet
    Dim xSht As Variant
    xAlerts = Application.DisplayAlerts
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("Index").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Index"
    I = 1
    Cells(1, 1).Value = "INDEX"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Index" Then
            I = I + 1
            xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
        End If
    Next
    Application.DisplayAlerts = xAlerts
End Sub

3. premi il F5 chiave per eseguire questa macro. Ora tutti i nomi dei fogli di lavoro nella cartella di lavoro attiva sono stati elencati in un nuovo foglio di lavoro chiamato Indice e anche i nomi dei fogli sono collegati a ciascun foglio, vedi screenshot:

Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
First, thanks to the author. And adding the Czech version.

tp 3. =O.KNIZE(1)&T(NYNÍ())
tp 4. =IFERROR(INDEX(ČÁST(nazvylistu;NAJÍT("]";nazvylistu)+1;255);ŘÁDKY($A$2:A4));"")
This comment was minimized by the moderator on the site
Hello,

je viens de tester la méthode via macros (dynamique avec formules) et ça marche au poil donc je tiens vraiment à remercier l'auteur de cet article parce que ça va vraiment m'aider dans mon travail ! Juste, je me permet de corriger les formules pour la version française. Et alors je ne sais pas si c'est parce que je suis sous la version 2019 mais Excel rouspète quand il n'y a pas d'argument en 3ème position de la fonction STXT ("MID" en version anglaise) donc obligé d'en rajouter un. Donc voilà ce que ça donne :

=LIRE.CLASSEUR(1)&T(MAINTENANT())

=SIERREUR(INDEX(STXT(nomsFeuilles;TROUVE("]";nomsFeuilles)+1,255;20);LIGNES($A$2:A2));"")

Bon travail à tous ! ;-)
This comment was minimized by the moderator on the site
Hello, Gizmil
Thank you for your comment, there are some functions are only available for English in Excel.
Your formula may help others.
Thanks again!
This comment was minimized by the moderator on the site
I close and open my document and all values in my sheet names column are all gone and blank but still the formula is there. I tried entering the same formula but it doesn't show the value anymore
This comment was minimized by the moderator on the site
Hello, Anne,
Sorrry for replying late, after creating the range names and formulas, you should save the workbook as Excel Macro-Enabled Workbook format, so next time, when you open the Excel file,the formulas can work well.
Please try, hope it can help you!
This comment was minimized by the moderator on the site
I tried this one and it works. But when I close and open the file again all the values in my sheet names are blank and gone but the formula is still there. I tried enteing the same formula again but it doesn't show the value anymore
This comment was minimized by the moderator on the site
BRILLIANT!! Thank you so much! 😊
This comment was minimized by the moderator on the site
Causes problems when document protection is enabled by email or corporate policy
This comment was minimized by the moderator on the site
Thanks so much, this worked great.
This comment was minimized by the moderator on the site
Works great!! Thank you!!!!
This comment was minimized by the moderator on the site
sooooo helpful, works as expected!!!!! Thanks
This comment was minimized by the moderator on the site
THANK YOU SO MUCH! I freaking love your website. In a matter of minutes I've had a ton of time saved with two sections of this site including this one. Love it!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations