Comment créer une liste de tous les noms des feuilles de calcul d’un classeur ?

Imaginez disposer d’un classeur contenant plusieurs feuilles de calcul et souhaiter lister automatiquement tous leurs noms, accompagnés de liens hypertexte cliquables pour accéder directement à chacune d’elles. Ce tutoriel vous présente des méthodes rapides et efficaces pour générer une liste des noms de feuilles dans Excel.

Obtenir dynamiquement une liste de toutes les Nom de la feuille de calcul d’un classeur à l’aide de formules

Obtenir une liste de toutes les Nom de la feuille de calcul d’un classeur avec Kutools pour Excel

Obtenir une liste de toutes les Nom de la feuille de calcul d’un classeur avec du code VBA

Obtenir dynamiquement une liste de toutes les Nom de la feuille de calcul d’un classeur à l’aide de formules

Dans Excel, vous pouvez attribuer un nom à une cellule, puis utiliser une formule pour lister tous les noms des feuilles du classeur actuel. Voici la marche à suivre :

1. Cliquez sur « Formules » > « Gestionnaire de noms » (voir la capture d’écran).

2. Dans la boîte de dialogue « Gestionnaire de noms », cliquez sur le bouton « Nouveau » (voir la capture d’écran).

3. Dans la boîte de dialogue « Nouveau nom » qui s’ouvre, saisissez un nom dans le champ « Nom », puis collez la formule ci-dessous dans le champ « Se réfère à », comme illustré dans la capture d’écran :

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

4. Cliquez ensuite sur « OK » > « Fermer » pour fermer les boîtes de dialogue. Rendez-vous maintenant sur la feuille où vous souhaitez lister tous les noms de feuilles, puis saisissez la formule suivante dans une cellule vide :

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

Remarque : dans la formule ci-dessus, « Sheetnames » correspond au nom de la cellule que vous avez créé à l’étape 3.

5. Faites ensuite glisser la poignée de recopie vers le bas jusqu’à ce que des cellules vides apparaissent. Tous les noms des feuilles du classeur actuel sont désormais listés, comme illustré dans la capture d’écran ci-dessous :

6. Pour créer un lien hypertexte vers chaque feuille, utilisez la formule suivante :

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

Remarque : dans la formule ci-dessus, « A2 » désigne la cellule contenant le nom de la feuille, et « A1 » correspond à la cellule où vous souhaitez que le curseur se positionne. Ainsi, en cliquant sur le lien hypertexte, vous accéderez directement à la cellule A1 de cette feuille.

7. Désormais, en cliquant sur le texte du lien hypertexte, vous êtes redirigé vers cette feuille — voir la démonstration ci-dessous :

Obtenir une liste de toutes les Nom de la feuille de calcul d’un classeur avec Kutools pour Excel

Grâce à l’utilitaire « Créer une table de liens » du complément tiers « Kutools pour Excel », créez en un seul clic une liste des noms de feuilles de calcul, chacun associé à un lien hypertexte vers la feuille correspondante.

1. Cliquez sur « KUTOOLS PLUS » > « Feuille de calcul » > « Créer une table de liens », comme illustré dans la capture d’écran :

2. Dans la boîte de dialogue « Créer une table de liens », définissez les paramètres suivants :

(1.) Choisissez le « Style » qui vous convient le mieux. Vous pouvez créer le nom de la feuille de calcul à l’aide de liens hypertexte ou de boutons de macro. (2.) Saisissez le nom de la feuille de calcul destinée à l’index des feuilles. (3.) Indiquez l’emplacement de l’index des feuilles de calcul. (4.) Indiquez le nombre de colonnes que vous souhaitez utiliser dans la nouvelle feuille de calcul pour afficher le nom de celle-ci.

3. Une fois les paramètres définis, cliquez sur « OK ». Tous les noms de la feuille de calcul ont été listés avec des liens dans une nouvelle feuille du classeur actuel. Voir la capture d’écran :

Nom de la feuille de calcul avec liens hypertexte	Nom de la feuille de calcul avec boutons de macro

Obtenir une liste de toutes les Nom de la feuille de calcul d’un classeur avec du code VBA

1. Maintenez enfoncées les touches « ALT » + « F11 » pour ouvrir la fenêtre « Microsoft Visual Basic pour Applications ».

2. Cliquez sur « Insertion » > « Module », puis collez la macro suivante dans la fenêtre du module.

VBA : lister toutes les Nom de la feuille de calcul avec des liens hypertexte dans une Nouvelle feuille de calcul :

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. Appuyez sur la touche « F5 » pour exécuter cette macro. Tous les noms des feuilles de calcul du classeur actuel sont désormais listés dans une nouvelle feuille de calcul nommée « Index », accompagnés de liens hypertexte permettant d’accéder à chaque feuille correspondante. Voir la capture d’écran ci-dessous :

Articles associés