VBA Condition "Si la feuille existe" Alors...
Fermé
Apprenti
-
2 sept. 2010 à 11:17
Patrice33740
Patrice33740
- Messages postés
- 8549
- Date d'inscription
- dimanche 13 juin 2010
- Statut
- Membre
- Dernière intervention
- 7 mai 2022
A voir également:
- Vba si feuille existe alors
- Vba créer une feuille si elle n'existe pas - Meilleures réponses
- Vba si feuille n'existe pas alors - Meilleures réponses
- Vba si feuille existe alors supprimer ✓ - Forum - Excel
- VBA Condition "Si la feuille existe" Alors... - Forum - VB / VBA
- Avec Excel, vérifier l'existance d'une feuill ✓ - Forum - Excel
- Supprimer une feuille excel par vba ✓ - Forum - Excel
- Vérifier si feuille existe ✓ - Forum - VB / VBA
5 réponses
Patrice33740
2 sept. 2010 à 16:17
- Messages postés
- 8549
- Date d'inscription
- dimanche 13 juin 2010
- Statut
- Membre
- Dernière intervention
- 7 mai 2022
2 sept. 2010 à 16:17
Bonjour,
Il n'est pas nécessaire de faire une boucle pour chercher si la feuille existe,
il suffit de faire ceci :
et pour l'utiliser :
Il n'est pas nécessaire de faire une boucle pour chercher si la feuille existe,
il suffit de faire ceci :
Function Feuille_Existe(ByVal Nom_Feuille As String) As Boolean Dim Feuille As Excel.Worksheet On Error GoTo Feuille_Absente_Error Set Feuille = ActiveWorkbook.Worksheets(Nom_Feuille) On Error GoTo 0 Feuille_Existe= True Exit Function Feuille_Absente_Error: Feuille_Existe= False End Function
et pour l'utiliser :
If Feuille_Existe("Feuil1") Thenou
If Not Feuille_Existe("Feuil1") Then