combinaisons sans répétitionsRésolu

Question

Bonjour, je suis débutant VBA. Et j'ai un pb au niveau du code que je rentre, je souhaiterai obtenir toutes les combinaisons possibles sans répétitions d'éléments qui sont en colonne A, sachant que si je met par exemple AA AB AC j'ai qu'une combinaison des 3 éléments et 3 de deux AA-AB; AA-AC, AB-AC car j'ai également essayé en concaténant et ça mélange tout. Si vous avez déjà déjà été confronté a ce problème voir même resolu celui-ci ou que vous avez une idée de la manière dont je pourrais procéder n'hesitez pas. Merci d'avance.

jrivet · Accepted Answer

Salut,
Dans mon exempl ele tableau ne possède que 3 éléments mais la manieres de procéder serait la même avec plus d'éléments.

Dim Possible(2) As String
Dim i As Integer
Dim j As Integer
Dim Combinaisons As String
   Possible(0) = "AA"
   Possible(1) = "AB"
   Possible(2) = "AC"
   
   For i = LBound(Possible) To (UBound(Possible) - 1)
       For j = i + 1 To UBound(Possible)
           Combinaisons = Combinaisons & Possible(i) & "-" & Possible(j) & vbCrLf
       Next j
   Next i
   
   Call MsgBox(Combinaisons), ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

Combinaisons sans répétitions

1 réponse

Votre réponse

Discussions similaires