Bonjour,
Question b=EAte, j'ai deux proc=E9dures d=E9clar=E9es dans un module.$
Je souhaiterai passer en param=E8tre deux tableaux et je ne me souviens
plus de la syntaxe.
J'aimerai les laisser local =E0 la proc=E9dure appelante et les utiliser
comme toute variable :
appelant procedure(TAB,TAB2)
appel=E9e
public sub procedure(tab,tab2)
msgbox(tab(1))
end sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Frédéric Sigonneau
Si j'ai bien compris :
'=============== Sub Appelante() Dim TAB1, TAB2 TAB1 = Array(, 1, 2, 3, 4) TAB2 = Array(, 5, 6, 7, 8) Appelée TAB1, TAB2 End Sub
Sub Appelée(Arr1, Arr2) MsgBox Arr1(1) MsgBox Arr2(1) End Sub '================ FS --- Frédéric Sigonneau http://frederic.sigonneau.free.fr
jask a écrit :
Bonjour, Question bête, j'ai deux procédures déclarées dans un module.$ Je souhaiterai passer en paramètre deux tableaux et je ne me souviens plus de la syntaxe.
J'aimerai les laisser local à la procédure appelante et les utiliser comme toute variable :
appelant procedure(TAB,TAB2)
appelée public sub procedure(tab,tab2) msgbox(tab(1)) end sub
Merci beaucoup Jask
Si j'ai bien compris :
'=============== Sub Appelante()
Dim TAB1, TAB2
TAB1 = Array(, 1, 2, 3, 4)
TAB2 = Array(, 5, 6, 7, 8)
Appelée TAB1, TAB2
End Sub
Sub Appelée(Arr1, Arr2)
MsgBox Arr1(1)
MsgBox Arr2(1)
End Sub
'================
FS
---
Frédéric Sigonneau
http://frederic.sigonneau.free.fr
jask a écrit :
Bonjour,
Question bête, j'ai deux procédures déclarées dans un module.$
Je souhaiterai passer en paramètre deux tableaux et je ne me souviens
plus de la syntaxe.
J'aimerai les laisser local à la procédure appelante et les utiliser
comme toute variable :
appelant procedure(TAB,TAB2)
appelée
public sub procedure(tab,tab2)
msgbox(tab(1))
end sub
'=============== Sub Appelante() Dim TAB1, TAB2 TAB1 = Array(, 1, 2, 3, 4) TAB2 = Array(, 5, 6, 7, 8) Appelée TAB1, TAB2 End Sub
Sub Appelée(Arr1, Arr2) MsgBox Arr1(1) MsgBox Arr2(1) End Sub '================ FS --- Frédéric Sigonneau http://frederic.sigonneau.free.fr
jask a écrit :
Bonjour, Question bête, j'ai deux procédures déclarées dans un module.$ Je souhaiterai passer en paramètre deux tableaux et je ne me souviens plus de la syntaxe.
J'aimerai les laisser local à la procédure appelante et les utiliser comme toute variable :
appelant procedure(TAB,TAB2)
appelée public sub procedure(tab,tab2) msgbox(tab(1)) end sub