ne verrais-tu pas plutôt en VIII-B-1
dans le code
I=0 et non 1
Code :
For I = 0 To UBound(tabArrayOrmonth, 1) 'UBound retourne la limite supérieure
'de la dimension voulue d'un tableau
Cells(I+1, 1) = tabArrayOrmonth(I) 'on remplit en colonne '<--- I+1
Cells(5+1, I + 2) = tabArrayOrmonth(I) 'on remplit en ligne '<--- I+1
Next I
plutôt que ce que tu as écrit
Code :
For I = 1 To UBound(tabArrayOrmonth, 1) 'UBound retourne la limite supérieure
'de la dimension voulue d'un tableau
Cells(I, 1) = tabArrayOrmonth(I) 'on remplit en colonne
Cells(5, I + 2) = tabArrayOrmonth(I) 'on remplit en ligne
Next I
ce qui permet au terme "Toto" d'apparaitre
Partager