Bonjour à toutes et à tous,

Voilà j'ai un onglet ( Feuil1) dans lequel se trouve des données (un tableau ≠ tableau de variable)

Je souhaite intégrer ces données dans un tableau de variable par une boucle.

J'ai donc fait:

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
20
21
22
23
 
Sub tab_varA()
 
'Définition du tableau
Dim tab_exemple()
 
'Déclaration
Dim dern_ligne As Variant
Dim dern_col As Variant
Dim i As Variant
 
'définition des limites du tableau
dern_ligne = Feuil1.Cells(Rows.Count, 1).End(xlUp).Row
dern_col = Feuil1.Cells(1, Columns.Count).End(xlToLeft).Column
 
'Enregistrement des valeurs dans le tableau
For i = 0 To dern_ligne
    For j = 0 To dern_col
        tab_exemple(i, j) = Feuil1.Cells(i + 1, j + 1)
    Next
Next
 
End Sub
Mais ça ne marche pas, j'ai un message d'erreur "l'indice n'appartient pas à la sélection",

Si quelqu'un a une idée de l'erreur à corriger, je suis preneur.

Merci à tous.