[fr-users] Syntaxe Basic

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



-- 
*Jean-Luc*
Je ne mange pas que pour vivre…
Je ne vis pas que pour manger…

-- 
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy