Transférer un tableau de valeurs en argument?

[haleakala]

Bonjour,

Je souhaiterais mettre comme argument d'une routine un tableau, mais j'avoue que je ne sais pas comment faire.

Voici le code:

sub main()
dim sinTest(0 to 49) as single
(...)
call routine1(sinTest)
end sub

sub routine1(byref sinTest as single)
cells(1,1).resize(1,50).value=sinTest
end sub

Chaque fois que j'essaie d'exécuter le programme, j'ai une erreur lors de la compilation me signalant que le type d'argument byRef n'est pas transférable (désolé, j'ai une version allemande d'Excel, et la traduction n'est donc pas toujours parfaite).

Est-ce qqun pourrait m'aider?

Cordialement,

Haleakala

 

[Hervé]

Re : Transférer un tableau de valeurs en argument?

bonjour

au regard de ta déclaration dans ta routine1, le programme attend un single comme argument, pas un tableau variant.

essaye comme ceci :

Sub routine1(ByRef sinTest)

salut

 

[haleakala]

Re : Transférer un tableau de valeurs en argument?

Hervé,

Merci pour l'information.

Maintenant, ca marche!

Merci!

Haleakala