Discussion :

[ManonTheMoon87]

Bonjour,

Avant toute chose, le suis sur un clavier qwerty donc je m'excuse pour le manqué d accent!

Je souhaite alimenter un tableau a l'aide de N vecteurs que j ai cree precedement, voice le code que j aimerai utiliser mais qui ne marche pas :

Code :

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

1
2
3
4
5
6
7
8
9
sub test()
 
dim dist as range
 
for I = 1 to N
 dist(,i)=vecteur i
next i
 
end sub

Je comprends que l'erreur est dans le dist(,i), je n'arrive pas a faire reference a une colonne complete pour l implementer directement. J aimerai eviter de passer par une boucle pour gagner en rapidite.

Merci d avance pour vos reponses

[patricktoulon]

bonjour manon
exemple

Code :

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

1
2
3
4
5
Sub test()
myvecteurs = Array(12, 45, 36, 75, 34, 19, 82, 73, 71, 45)
'on va les mettre en colonne B a partir de la ligne 3 par exemple soit "B3"
Sheets(1).Cells(3, 2).Resize(UBound(myvecteurs) + 1, 1) = Application.Transpose(myvecteurs)
End Sub

et pour un tableau x lignes et x colonne c'est

Code :

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

1
2
3
4
Sub test2()
 MyArray = [{1,2,3;4,5,6;7,8,9}]
Sheets(1).Cells(3, 3).Resize(UBound(MyArray), 3) = (MyArray)
End Sub

[ManonTheMoon87]

Merci pour vos reponses

Cependant j aimerai eviter de passer par le tableur, etant donne que mes vecteurs sont calcules sous VBA et que le tableau qui rassemble tous les vecteurs n est pas destine a sortir sur mon tableur (ce ne sont que des variables intermediaire).
J aimerai trouver un moyen d eviter de passer par le tableur qui, me semble t il, prends plus de temps.

j ai tout simplement plusieurs vecteurs de meme longeur que j aimerai mettre dans un meme tableau, cote a cote.

merci pour votre aide et votre rapidite.

[patricktoulon]

tu dis que tu veux pas passer par le tableur mais dans ton énoncé tu parle de range

la je comprends plus !!!!!

soit plus clair dans tes demandes

[ManonTheMoon87]

Ah oui effectivement c est une erreur, il faut plutot lire :

Code :

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

dim dist as variant

desolee pour ca !

merci

[patricktoulon]

Et ben !!! Myvecteurs est une variable tableau qui contient les. Elements qui sont dans. Le. Split
Je vois pas. Ce que tu cherche d autre ?

[Marc-L]

La variable N de ton code n'étant pas initialisée (égale à zéro donc) la boucle ne se déclencherait même pas !
Une colonne est sur deux dimensions, donc le i est en premier :

Code :

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

Cells(i, 1) =

… Voir l'aide VBA !

Et s'il est question de créer une variable tableau représentant une colonne de 1 à 9 par exemple :

Code :

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

V = [ROW(1:9)]