Bonjour ,

Je cherche à vérifier que toutes les valeurs des variables d'un tableau a deux dimensions , contiennent la valeur zéro.
=> Tablo_CptDep(4, 0)
Ce sont les variables "0" (deuxieme dimension du tableau) que je cherche a tester.
Forcemment, je tourne en rond.. Le code ci dessous n'as pas trouvé les instructions adéquates !
Y a -t-il une instruction simple englobant tous les éléments du tableau ?
Merci !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim Tablo_CptDep(4, 0)
 
Sub es()
 
 
Tablo_CptDep(1, 0) = 0
Tablo_CptDep(2, 0) = 1
Tablo_CptDep(3, 0) = 0
Tablo_CptDep(4, 0) = 0
 
 
    If UBound(Tablo_CptDep) Then
 
        MsgBox "Ok"
 
    End If
 
 
End Sub