Discussion :

[tineighty]

Bonjour,

J'airais besoin de "récupérer" la valeur d'une variable d'un sous programme dands mon sub principal. Je m'explique :

Code :

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

1
2
3
4
5
6
7
8
sub prog_principal ()
blabla...
if blabla then call prog_secondaire
blabla...
for u = 1 to ma_variable
blabla...
next u
end sub

Code :

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

1
2
3
sub prog_secondaire
ma_variable = blabla
end sub

donc j'aimerais recuperer "ma_variable".

Je connais l'astuce consistant à stocker dans une cellule du fichier excel le contenu de la variable, puis le récupérer dès que l'on revient au sub principal puis à effecer cette cellule de stockage en fin de code. Mais je voudrais faire quelque chose de propre et carré si c'est possible.

Merci d'avance!

[Lou Pitchoun]

Salut,

Il faut que prog_secondaire soit déclaré comme une fonction

Code :

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

1
2
3
Public Function prog_secondaire () As TypeàRenvoyer
prog_secondaire  = blabla
end Function

Code :

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

if blabla then Mavariable = prog_secondaire

[ouskel'n'or]

Tu peux aussi déclarer ta variable en Public.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public ma_variable as letype
 
sub prog_principal ()
blabla...
if blabla then call prog_secondaire
blabla...
for u = 1 to ma_variable
blabla...
next u
end sub
 
sub prog_secondaire
ma_variable = blabla
end sub

Mais c'est moins sioux