[Résolu] Macro générateur aléatoire

Off à dit:

Bonjour,

dans le fichier joint, j'ai une problématique + une macro associée qui ne répond que partiellement....

Tout est décrit dans le classeur.

Merci pour votre aide (qu'il y ait ou non une solution)

David

Cliquez pour agrandir...

'-------
'-------
  For i = 1 To 4
  For j = i + 1 To 4
  If Right(Cells(i, 1), 2) = Right(Cells(j, 1), 2) Then
  x = x + 1
  End If
  Next
  Next
  If x > 0 Then Call TriColonneAleatoire
End Sub