Hello,
Merci de votre retour,
@Johan , merci je vais regarder ton code. En continuant mes recherches sur d'autres forum, je suis tombée là-dessus aussi mais je doit encore tester :
Function NbColorText(ByRef Plage As Range, ByRef Couleur As Byte, text As String) As Long
Dim c As Range...