Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim tab_csv(2, 15)
Dim i As Integer
Dim k As Integer
-----------------------------------------------------------------------------------
For i = 1 To 2
   For k = 1 To 15
      tab_csv(i, 1) = Workbooks("localmasse.csv").Worksheets("localmasse").Cells(i, 1).Text
       tab_csv(i, 2) = Workbooks("localmasse.csv").Worksheets("localmasse").Cells(i, 2).Text
   Next k
Next i
MsgBox tab_csv(1, 11)
J'ai un tableau à 2 dimensions ( avec 2 colonnes, et un nb de ligne infini )
Je voudrais stocker les valeurs d'un fichier csv dans ce tableau;
C'est ce que le code est censé faire mais ca marche pas, Pourquoi ?
Merci d'avance.