Bonjour,

Je souhaite alléger mon code de Sub Finale (qui fait actuellement 35 lignes)

J'ai eu l'idée de le découper en petit subs...

JE souhaite faire un sub d'affectation des variables qui va me regrouper 5-6 instructions environs.

Pour simplifier mon exemple, supposons que j'ai

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub Somme (dSomme as Double, dSomme1 as Double, par1 as Integer, par2 as Integer)
dSomme =Somme(par1)
dSomme1= Somme (par2)
end Sub
 
Et que j'ai
 
Sub finale
Dim dSomme , dSomme1 as Double
Dim par1,par2 as Integer
Call Somme(dMoyenne,dMoyenne1,par1,par2)
End Sub
Sub Somme marche bien mais pas finale... Je sais que les variables locales dans un sub, mais je ne sais comment contourner ce problème.
Pouvez vous m'aider??

Merci d'avance