bonjour
tu peux utiliser instr
If InStr(1, ActiveWorkbook.Name, "Classeur", vbBinaryCompare) > 0 Then MsgBox "oui"
tu peux aussi boucler sur chaque classeur, ton classeur peut être présent mais pas forcément actif
for each wb in workbooks
if instr(1,wb.name, .....)
next wb
attention le paramètre vbBinaryCompare est contraignant, excel va prêter attention à la casse ou aux accents en effectuant sa recherche
bye
stephane