@Steelson
T'inquiète, je ne sais toujours pas faire de NB.SI.ENS !
A vrai dire, je suis récalcitrant ...
c'est quoi NB.SI.ENS ?
c'est pareil, je suis récalcitrant à mettre les mains de le cambouis, s'agissant des formules
@Clem7640
J'ai voulu remplacer ActiveCell par A1 mais cela ne fonctionne pas :
comment tu as fais ton remplacement ?
essaye ça :
Sub test()
MsgBox "." & Mid([A1], InStr([A1], "arbre"))
End Sub