Re : Doublon avec condition
Re,
En effet, la cellule en question contenait des espaces j'ai utilise Trim pour enelever tous les espaces.
Maintenant un nouveau message d'erreur "Run-time error '6': Overflow " sur la meme ligne du code:
If CLng(Replace(.Cells(I, 3).Value, ".", ",")) * 1...