Probleme affectation de variable
Bonjour, j'ai un petit problème dans mon code VBA que voici :
Code:
1
2
3
4
| If est_utilisable = True And m = 1 Then
ReDim Caisses_utilisables(UBound(Caisses_utilisables) + 1)
Caisses_utilisables(UBound(Caisses_utilisables) - 1) = Caisses(0, i)
End If |
Sous certaines conditions, je rajoute une valeur à la fin de mon tableau dynamique et je dois donc augmenter de 1 sa taille. Si je rajoute un
Code:
MsgBox Caisses_utilisable(UBound(Caisses_utilisables))
avant le End If, la macro affiche bien toutes mes valeurs.
Par contre avec ce code qui est censé afficher l'ensemble du tableau (le code marche avec d'autres tableaux) je reçois un ensemble de case vide (mais le bon nombre de case).
Code:
1
2
3
4
5
6
7
|
frag = ""
For i = 0 To UBound(Caisses_utilisables) - 1 Step 1
MsgBox Caisses_utilisables(i)
frag = frag & Caisses_utilisables(i) & " / "
Next i
MsgBox frag |
Je pense qu'il y à un problème d'affectation de variable dans cette histoire, une idée ?
Merci d'avance,
Cordialement
