Phillip
XLDnaute Occasionnel
Bonjour,
J'ai un comportement bizarre avec un array
Voici le code que j'ai écrit, en tous cas qui ressemble à mon vrai fichier....
Comme vous le voyez, j'ai un doublon dans mes recherche (2 et 30). Dans ce fichier, ça marche, mais dans mon fichier original, cela ne marchait pas. Cela me remplissait bien la cellule pour la première occurrence, mais rien pour la 2°. J'ai donc fait ce code test et suis très étonné qu'il marche...!!! Alors, dans mon code initila, j'ai changé l'ordre des paramètres i et j dans mes "if" et là ça marche pour les 2 occurrences !
Mystère !! Bizarre ? Quelqu'un pour éclairer ma lanterne ?
Merci
Cordialement
Phillip
J'ai un comportement bizarre avec un array
Voici le code que j'ai écrit, en tous cas qui ressemble à mon vrai fichier....
VB:
Sub TEST()
poste1 = 16
poste2 = 1
poste3 = 2
poste4 = 30
poste5 = 45
poste6 = 67
Mon_Tableau = Array(poste1, poste2, poste3, poste4, poste5, poste6)
For i = LBound(Mon_Tableau) To UBound(Mon_Tableau)
For j = LBound(Mon_Tableau) To UBound(Mon_Tableau)
If Mon_Tableau(i) = 1 And Mon_Tableau(j) = 16 Or Mon_Tableau(j) = 16 And Mon_Tableau(i) = 1 Then
Cells(1, 2).Value = "variable 1"
ElseIf Mon_Tableau(i) = 2 And Mon_Tableau(j) = 30 Or Mon_Tableau(j) = 30 And Mon_Tableau(i) = 2 Then
Cells(2, 2).Value = "Variable2"
ElseIf Mon_Tableau(i) = 45 And Mon_Tableau(j) = 67 Or Mon_Tableau(j) = 45 And Mon_Tableau(i) = 67 Then
Cells(3, 2).Value = "variable 3"
ElseIf Mon_Tableau(i) = 30 And Mon_Tableau(j) = 2 Or Mon_Tableau(j) = 2 And Mon_Tableau(i) = 30 Then
Cells(4, 2).Value = "variable 4"
ElseIf Mon_Tableau(i) = 16 And Mon_Tableau(j) = 67 Or Mon_Tableau(j) = 67 And Mon_Tableau(i) = 16 Then
Cells(5, 2).Value = "variable 5"
End If
Next j
Next i
End Sub
Comme vous le voyez, j'ai un doublon dans mes recherche (2 et 30). Dans ce fichier, ça marche, mais dans mon fichier original, cela ne marchait pas. Cela me remplissait bien la cellule pour la première occurrence, mais rien pour la 2°. J'ai donc fait ce code test et suis très étonné qu'il marche...!!! Alors, dans mon code initila, j'ai changé l'ordre des paramètres i et j dans mes "if" et là ça marche pour les 2 occurrences !
Mystère !! Bizarre ? Quelqu'un pour éclairer ma lanterne ?
Merci
Cordialement
Phillip