Discussion :

[Z20500]

Bonjour,

Je me dis que j'ai certainement dû passer à côté de quelque chose, j'ai l'impression d'être un boulet, mais je n'arrive pas à trouver comment copier une variable tableau à plusieurs dimensions dans une autre variable.
Donc jusqu'à maintenant, je procède par valeur par valeur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 dim tableau1(100,200) as string
dim tableau2(100,200) as string
dim Nblignes as integer
dim Nbcols as integer
 
nblignes=1
do while (nblignes <= ubound(tableau1, 1)
    nbcols=1
    do while (nbcols <= ubound(tableau1, 2)
        tableau2(nblignes, nbcols) = tableau1(nblignes, nbcols)
        nbcols++
    loop
    nblignes++
loop

mais c'est chronophage, aussi bien au codage qu'à l'exécution, surtout s'il y a plusieurs dimensions et/où plusieurs milliers de valeurs...

Je me dis qu'il doit certainement y avoir plus simple, mais je n'ai pas trouvé

J'aimerais faire quelque chose dans ce genre-là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 dim tableau1(100,200) as string
dim tableau2(100,200) as string
tableau2 = tableau1

Quelqu'un aurait-il une idée ?

En vous remerciant d'avance pour vos réponses, je vous souhaite une bonne soirée.

[Theze]

Bonjour,

C'est possible mais il ne faut pas que le second tableau soit au préalable dimensionné :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim tableau1(100, 200) As String
Dim tableau2() As String
'...
tableau2 = tableau1

Hervé.

[Z20500]

Bonjour,

Merci pour votre réponse.
Il faut écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tableau1 = tableau2

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tableau1() = tableau2()

?

[Z20500]

Bonsoir,

c'est la première solution qui marche. J'avais juste une erreur provoquée par une portée de variable mal gérée.