Discussion :

[gogo1741]

Bonjour,

je suis débutant en vba , j'ai ecris un programme principal dans le quel je fais appel à ma procèdure sub() qui prend en argument des élements calculés dans le main , par contre quand je fais l'appel, sub() ne connait pas ces élements et les mets = à 0 ,
Quelqu'un peut m'aider svp ? et merci

[casefayere]

Bonjour,

il faut au moins que tu donnes le code de ce que tu appelles 'ton programme principal" et le code de ta procédure appelée.

bon courage

[gogo1741]

Voila

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
sub main()  'excel objet'
 
'calcul de paramètres....
 
h=....
a=.... (a/=0)
 
'appel module intermediaire
intermediare()
 
msgbox b 
end sub main 
===> donne erreur ( ne connait ni h ni a )
'************************
sub intermediaire  'module'
 
b=h/a
 
end sub

[AlainTech]

Bonjour,

Tu dois passer tes arguments à ta procédure appelée.

Code :

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

1
2
sub intermediaire(LeA As Integer, LeH As Integer)
b=LeH/LeA

Et l'appel:

Code :

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

intermediare(a, h)

Mais, dans ce cas précis, il vaudrait mieux une fonction:

Code :

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

1
2
3
Function intermediaire(LeA As Integer, LeH As Integer) As Double
  intermédiaire = LeH/LeA
End Function

Et l'appel:

Code :

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

b = intermediare(a, h)