Insérer graphe si début nom de feuille particulier

[fgh789]

Bonjour et bonne année

Je chercher à savoir comment faire pour ajouter une feuille graphe après une feuille dont les premiers caractères sont constants, par exemple "Mois de "

Je sais qu'il existe la fonction Left(Worksheet.Name, 8) donc l'idée serait

For Each WorkSheet In ActiveWorkbook.Worksheets
If Left(FullListSheet.Name, 10) = "Mois de " Then 
'condition à éxécuter
End If
Next WorkSheet

Je voudrais savoir comment compter le nombre de feuille dont la première partie est toujours "Mois de " par exemple. En fait je demande ça car la solution du dessus est censée marcher, mais en ayant le nombre exact je pourrais insérer une boucle For.

Je n'ai pas joint de fichier car ça doit être relativement simple pour vous

Bonne journée