Fonction qui valide la présence d'une feuille

Bonjour,

Si j'utilise la fonction FeuilleExiste de cette façon cela fonctionne correctement.
If FeuilleExiste("Feuil1") Then
Sheets("Feuil1").Select
Sheets("Feuil1").Name = VDatadeBase1(1)
End If

Si j'utilise ma fonction ainsi alors j'obtiens un type d'argument by ref incompatible. La valeur de VDatadeBase1(1) est "serveurs"

If not FeuilleExiste(VDatadeBase1(1)) Then
Sheets("Feuil1").Select
Sheets("Feuil1").Name = VDatadeBase1(1)
End If


Public Function FeuilleExiste(sNomFeuille As String) As Boolean
'Validation de l'existence d'une feuille
On Error GoTo Err_FeuilleExiste
FeuilleExiste = False
FeuilleExiste = Not ActiveWorkbook.Worksheets(sNomFeuille) Is Nothing
Err_FeuilleExiste:
End Function

Comment puis-je faire pour être compatible dans les 2 scénarios?

Merci,

François Racine