[VBA] Comment tester si un onglet existe déjà ?

Q&R publiée par MyDearFriend! le 26-03-2008

[VBA] Comment tester si un onglet existe déjà ?

Voici une fonction personnalisée pour réaliser ce test simplement :

DANS UN MODULE DE CODE STANDARD
Function FeuilExiste(F As String) As Boolean
'myDearFriend!  -  www.mdf-xlpages.com
    On Error Resume Next
    FeuilExiste = Not Sheets(F) Is Nothing
End Function


Exemple d'utilisation :

Sub Test() 
Dim Feuil As String

    Feuil = "MaFeuille"
    
    If FeuilExiste(Feuil) Then
        MsgBox "L'onglet " & Feuil & " existe déjà dans le classeur actif."
    Else
        MsgBox "L'onglet " & Feuil & " n'existe pas dans le classeur actif."
    End If
End Sub

Cette Q&R a été trouvée sur myDearFriend! Excel Pages : https://www.mdf-xlpages.com/modules/smartfaq/faq.php?faqid=40