Bonjour h2so4
Ton code fonctionne bien
As tu une idée pour simplifier les lignes ci-dessous, je dois aller jusque X3
GenereSerieAleatoireSansDoublons v, Range("B3")
GenereSerieAleatoireSansDoublons v, Range("C3")
GenereSerieAleatoireSansDoublons v, Range("D3")
GenereSerieAleatoireSansDoublons v, Range("E3")