Tester la présence d'un onget

tu peux utiliser la fonction ci-dessous, qui teste la présence de la feuille, la crée éventuellement et t'indique si l'opération s'est bien déroulée (True ou False)

Function TestOnglet(ByVal Onglet$) As Boolean 'Ti
Dim Ws As Worksheet
On Error Resume Next
With ThisWorkbook
Set Ws = .Worksheets(Onglet)
If Ws Is Nothing Then
Set Ws = .Worksheets.Add
Ws.Name = Onglet
End If
TestOnglet = Not Ws Is Nothing
End With
End Function

Sub Test()
MsgBox TestOnglet("Feuil10")
End Sub