Bonjour à tous,
comme l'indique si bien le titre j'ai un gros problème avec l'utilisation des boucles for appliquées à un tableau VBA...
Pour faire simple j'aimerai que chaque cellule de ce tableau soit égale à la précédente +1... j'ai donc réalisé ce joli code:
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 Sub tableau() Dim tableau(1 To 4, 1 To 4) As Single Dim j, h As Integer Worksheets("feuil2").Select For j = 1 To 4 tableau(j, 1) = Cells(j + 1, 3) + 1 Next j Range("C3:F6").Value = tableau End Sub
mais voila surprise! au lieu d'avoir 1,2,3,4 dans ma première colonne je n'ai que des 1!! J'ai diablement besoin de ce bout de code pour la suite de mon projet et je ne trouve pas la solution... Auriez vous une idée???
Partager