Bonjour a tous
Voila comme l'indique le titre, je ne parviens pas a mettre mes variables dans des types compatibles.
Voici le code :
Message d'erreur : Tableau attendu
Message d'erreur : Incompatibilité de type
Merci a vous de m'expliquer comment remédier a ce léger soucis.
Voila comme l'indique le titre, je ne parviens pas a mettre mes variables dans des types compatibles.
Voici le code :
Code:
Dim TabQ As Integer
TabQ = Array(19, 32, 43, 50, 59, 66, 73, 80, 91, 98, 105, 116, 123, 130, 141, 152, , 159, 166, 173, 180, 187, 194, 201, 212, 219, 226, 237, 244, 251, 258, 269, 276, 283, 294, 301, 308)
For i = 0 To 35
Cells(TabQ(i), 6) = "0"
Cells(TabQ(i) + 309, 6) = "0"
Cells(TabQ(i) + 309, 6) = "0"
Next i
Message d'erreur : Tableau attendu
Code:
Dim TabQ As Variant
TabQ = Array(19, 32, 43, 50, 59, 66, 73, 80, 91, 98, 105, 116, 123, 130, 141, 152, , 159, 166, 173, 180, 187, 194, 201, 212, 219, 226, 237, 244, 251, 258, 269, 276, 283, 294, 301, 308)
For i = 0 To 35
Cells(TabQ(i), 6) = "0"
Cells(TabQ(i) + 309, 6) = "0"
Cells(TabQ(i) + 309, 6) = "0"
Next i
Message d'erreur : Incompatibilité de type
Merci a vous de m'expliquer comment remédier a ce léger soucis.