Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Tableau [ ] item

4 réponses
Avatar
PST
Myarray_2 =3D Sheets("FEUIL_TEST").[J2:J15].Value

14 =E9l=E9ments

[P2:P15] =3D Myarray_2

Fonctionne

________________

Mais si je fais


cells(10,30) =3D Myarray_2(2) ne fonctionne pas
ActiveCell.Offset(0, 22) =3D Myarray_2(10) non plus

erreur 9 l'indice n'appartient pas =E0 la s=E9l=E9ction

_____________

ou encore

Dim MyArray_2(2 To 15)
MyArray_2 =3D Sheets("FEUIL_TEST").[J2:J15].Value

Impossible d'affecter le tableau
erreur de compilation


merci

4 réponses

Avatar
Daniel
Bonjour.
Quand tu écris :
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value
tu génères un tableau à 2 dimensions. Ecris :
cells(10,30) = Myarray_2(2,1)
ou
ActiveCell.Offset(0, 22) = Myarray_2(10,1)
Cordialement.
Daniel
"PST" a écrit dans le message de news:
46c083cd$0$27391$
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

14 éléments

[P2:P15] = Myarray_2

Fonctionne

________________

Mais si je fais


cells(10,30) = Myarray_2(2) ne fonctionne pas
ActiveCell.Offset(0, 22) = Myarray_2(10) non plus

erreur 9 l'indice n'appartient pas à la séléction

_____________

ou encore

Dim MyArray_2(2 To 15)
MyArray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

Impossible d'affecter le tableau
erreur de compilation


merci
Avatar
PST
Bonjour.
Quand tu écris :
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value
tu génères un tableau à 2 dimensions. Ecris :
cells(10,30) = Myarray_2(2,1)
ou
ActiveCell.Offset(0, 22) = Myarray_2(10,1)
Cordialement.
Daniel
"PST" a écrit dans le message de news:
46c083cd$0$27391$
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

14 éléments

Que dire, rapide et précis


merci

[P2:P15] = Myarray_2

Fonctionne

________________

Mais si je fais


cells(10,30) = Myarray_2(2) ne fonctionne pas
ActiveCell.Offset(0, 22) = Myarray_2(10) non plus

erreur 9 l'indice n'appartient pas à la séléction

_____________

ou encore

Dim MyArray_2(2 To 15)
MyArray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

Impossible d'affecter le tableau
erreur de compilation


merci




Avatar
PST
Bonjour.
Quand tu écris :
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value
tu génères un tableau à 2 dimensions. Ecris :
cells(10,30) = Myarray_2(2,1)
ou
ActiveCell.Offset(0, 22) = Myarray_2(10,1)
Cordialement.
Daniel
"PST" a écrit dans le message de news:
46c083cd$0$27391$
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

14 éléments

Que dire, rapide et précis


merci



Impecable

merci
[P2:P15] = Myarray_2

Fonctionne

________________

Mais si je fais


cells(10,30) = Myarray_2(2) ne fonctionne pas
ActiveCell.Offset(0, 22) = Myarray_2(10) non plus

erreur 9 l'indice n'appartient pas à la séléction

_____________

ou encore

Dim MyArray_2(2 To 15)
MyArray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

Impossible d'affecter le tableau
erreur de compilation


merci






Avatar
JB
Bonjour,

Set Myarray_2 = Sheets("FEUIL_TEST").[J2:J15] ' tableau 1 dimension
MsgBox Myarray_2(2)

Myarray_2 = Sheets("FEUIL_TEST").[J2:J15] ' tableau 2
dimensions
MsgBox Myarray_2(2, 1)

http://boisgontierjacques.free.fr/pages_site/tableaux.htm

JB

On 13 août, 20:24, PST wrote:
Myarray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

14 éléments

[P2:P15] = Myarray_2

Fonctionne

________________

Mais si je fais

cells(10,30) = Myarray_2(2) ne fonctionne pas
ActiveCell.Offset(0, 22) = Myarray_2(10) non plus

erreur 9 l'indice n'appartient pas à la séléction

_____________

ou encore

Dim MyArray_2(2 To 15)
MyArray_2 = Sheets("FEUIL_TEST").[J2:J15].Value

Impossible d'affecter le tableau
erreur de compilation

merci