Comment vérifier si une feuille existe dans un classeur ?
Lorsque vous avez des dizaines, voire des centaines de feuilles de calcul dans un classeur, et que vous souhaitez trouver ou vérifier si une feuille existe dans ce classeur, cela peut généralement représenter une tâche énorme. Je vais maintenant vous présenter un code VBA ainsi qu'un outil pratique pour vérifier rapidement si une feuille existe dans un classeur.
Vérifiez si une feuille existe dans un classeur avec VBA
Vérifiez si une feuille existe et basculez vers elle avec Kutools pour Excel 
Vérifiez si une feuille existe dans un classeur
Veuillez suivre les étapes ci-dessous pour copier le code VBA et l'exécuter afin de vérifier si une feuille existe dans le classeur actuel.
1. Appuyez sur Alt + F11 pour afficher la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre, cliquez sur Insérer > Module pour afficher une nouvelle fenêtre de module, puis copiez le code VBA suivant dans la fenêtre du module.
VBA : Vérifiez si une feuille existe dans un classeur.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function3. Enregistrez ce code, puis revenez à la feuille et sélectionnez une cellule vide pour y taper cette formule =CheckSheet(“Feuil1”) (Feuil1 indique le nom de la feuille que vous souhaitez vérifier). Appuyez sur le bouton Entrée. FAUX indique que cette feuille n'existe pas, et VRAI indique qu'elle existe dans le classeur actuel.
Vérifiez si une feuille existe et basculez vers elle avec Kutools pour Excel avec VBA
Avec la fonction définie ci-dessus, vous pouvez simplement vérifier si une feuille existe, mais cela reste un peu difficile. Cependant, avec Kutools pour Excel, le volet Navigation liste tous les noms des feuilles pour vous, ce qui permet de faire défiler pour trouver la feuille, ou de filtrer le nom de la feuille pour la trouver. Et si vous le souhaitez, vous pouvez cliquer sur le nom de la feuille pour basculer rapidement vers celle-ci après l'avoir trouvée.
Après avoir installé gratuitement Kutools pour Excel, veuillez procéder comme suit :
1. Activez le classeur dans lequel vous souhaitez vérifier si un nom de feuille existe, puis cliquez sur Kutools > Navigation. Voir la capture d'écran
:
2. Ensuite, dans le volet qui apparaît, cliquez sur Classeur et Feuille pour développer le volet. Vous pouvez voir tous les noms des feuilles listés dans le volet, et vous pouvez faire défiler pour trouver les noms des feuilles.
3. Ou vous pouvez cocher Filtrer puis tapez les mots-clés du nom de la feuille que vous souhaitez vérifier. Le nom de la feuille spécifiée sera alors listé. Cliquez sur le nom de la feuille, et vous serez redirigé vers cette feuille.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels