Comment sélectionner une feuille de calcul spécifique en fonction de la valeur de la cellule sur une autre feuille dans Excel?

Supposons que vous ayez une liste déroulante de validation des données contenant tous les noms de feuille de calcul et que vous souhaitiez sélectionner ou accéder automatiquement à la feuille de calcul correspondante en fonction du nom de feuille que vous avez sélectionné dans la liste déroulante, que pouvez-vous faire? Et que diriez-vous de passer automatiquement à une certaine feuille de calcul après avoir tapé le nom de la feuille dans une cellule spécifiée? Cet article vous montrera plusieurs méthodes pour y parvenir.

Sélectionnez une feuille de calcul spécifique en fonction de la sélection de la liste déroulante avec le code VBA
Sélectionnez une feuille de calcul spécifique en fonction de la valeur de la cellule avec le code VBA
Créez facilement un index de feuilles et passez à certaines feuilles de calcul avec Kutools for Excel

Sélectionnez une feuille de calcul spécifique en fonction de la sélection de la liste déroulante avec le code VBA

Par exemple, une liste déroulante se trouve dans la cellule A2 de la feuille 8. Vous pouvez exécuter le code VBA ci-dessous pour sélectionner ou accéder à la feuille de calcul correspondante lorsque le nom de la feuille est sélectionné dans la liste déroulante.

1. presse autre + F11 ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez sur le nom de la feuille (la feuille de calcul qui contient la liste déroulante dans laquelle vous sélectionnerez les noms de feuille) dans la barre de gauche, puis copiez et collez le code VBA ci-dessous dans la fenêtre Code.

Code VBA: sélectionnez une feuille de calcul spécifique en fonction de la sélection de la liste déroulante

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
        ThisWorkbook.Sheets(Target.Value).Activate
End Sub

Notes: Vous pouvez remplacer «A2» par votre propre cellule.

3. presse autre + Q touches simultanément pour fermer le Microsoft Visual Basic pour Applications fenêtre.

À partir de maintenant, lorsque vous choisissez un nom de feuille dans la liste déroulante de Sheet8, cette feuille de calcul sera sélectionnée automatiquement.

Sélectionnez une feuille de calcul spécifique en fonction de la valeur de la cellule avec le code VBA

Si vous souhaitez accéder à une certaine feuille de calcul après avoir tapé le nom de la feuille dans une cellule (cellule A1 dans sheet1), vous pouvez essayer le code VBA suivant.

1. presse autre + F11 ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez sur le nom de la feuille (la feuille de calcul que vous saisirez dans le nom de la feuille) dans la barre de gauche, puis copiez et collez le code VBA ci-dessous dans la fenêtre Code. Voir la capture d'écran:

Code VBA: sélectionnez une feuille de calcul spécifique en fonction de la valeur de la cellule

Sub ActivateSheetsByValue()
    On Error Resume Next
    ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub

3. Revenez à la feuille de calcul et entrez le nom de la feuille que vous souhaitez sélectionner dans la cellule A1 et activez la fenêtre de code, puis appuyez sur la touche F5 pour exécuter le code.

Si la cellule A1 de Sheet1 contient le nom de feuille de calcul «Sheet8», après avoir exécuté le code VBA, elle passera immédiatement à Sheet8.

Créez facilement un index de feuilles et passez à certaines feuilles de calcul avec Kutools for Excel

Si vous souhaitez simplement sélectionner ou accéder rapidement à une feuille de calcul spécifique, vous pouvez essayer le Créer une liste de noms de feuilles utilité de Kutools for Excel. Avec cet utilitaire, vous pouvez facilement créer un index de feuille, puis passer rapidement à une certaine feuille de calcul en cliquant sur le nom de la feuille.

1. Cliquez Kutools Plus > Feuille > Créer une liste de noms de feuilles. Voir la capture d'écran:

2. dans le Créer une liste de noms de feuilles boîte de dialogue, sélectionnez Contient une liste d'hyperliens option dans la Styles d'index de feuille section; tapez un nom pour votre index de feuille dans le Spécifiez le nom de la feuille pour l'index de la feuille boîte; Choisir Avant toutes les feuilles de l'index Insérer la feuille dans la liste déroulante. Cliquez ensuite sur le OK .

Notes: vérifier la Contient des boutons et des macros option, vous obtiendrez un index de feuille avec le bouton macros. Voir la capture d'écran:

Dans la feuille de calcul Index, vous pouvez cliquer sur un certain nom de feuille de calcul pour accéder automatiquement à cette feuille de calcul.

Créez facilement un index de feuilles et passez à certaines feuilles de calcul avec Kutools for Excel