Syntaxe Basic

[JeanLuc]

Bonjour
Je soumet à votre sagacité ce petit souci de Basic
Je ne dois pas bien comprendre la gestion des tableaux à plusieurs
dimensions

Pourquoi cette syntaxe ne fonctionne pas ?

Dim tData() as variant
Dim tLigne() as variant
Dim tListe() as variant
Dim tNew(19)
…
redim preserve tListe(p)
For noLigne = 1 to p
tLigne = tData(noLigne)
tNew(0) = tLigne (0) 'auteurs
tNew(1) = tLigne (1) 'tri auteur
…
tNew(17) = tLigne (17) 'uuid
tNew(18) = tLigne (4) 'isbn
tNew(19) = tLigne (5) 'identifiants

tListe(noLigne) = tNew
next noLigne
le tableau tListe contient bien p lignes mais c'est la dernière ligne de
tData qui est est dupliquée p fois

alors que celle_ci fonctionne

Dim tData() as variant
Dim tLigne() as variant
Dim tListe(2500, 19) as variant

redim preserve tListe(p, 19)

For noLigne = 1 to p
tLigne = tData(noLigne)
tListe(noLigne, 0) = tLigne (0) 'auteurs
tListe(noLigne, 1) = tLigne (1) 'tri auteur
…
tListe(noLigne, 17) = tLigne (17) 'uuid
tListe(noLigne, 18) = tLigne (4) 'isbn
tListe(noLigne, 19) = tLigne (5) 'identifiants

next noLigne

Avec tous remerciements

Bonne année, bonne santé à tous