Bonjour,
Je suis en train de développer une macro qui rempli des tableaux de stats à partir de tableaux de données situés dans d'autre feuilles de calculs du même fichier.
J'ai besoin de faire une procédure qui a plusieurs paramètres en sortie j'ai donc googlé un peu et j'ai trouvé le ByRef.... Sauf que mes variables, après avoir été passée en paramètre ByRef à ma procédure, est vide....

Voici mon code :
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 calcStats
 
Dim nbFoyers
Dim nbEnfants
 
' Nombre de foyers pour les Vacances Familiales pour la tranche < 401
CompteNbFoyers 0, 400, "VF", nbFoyers, nbEnfants
MsgBox nbFoyers, 64
MsgBox nbEnfants, 64
[...]
End Sub
 
Sub CompteNbFoyers(ByVal QFMin As Integer, ByVal QFMax As Integer, ByVal typeVac As String, ByRef nbFoyers As Integer, ByRef nbEnfants As Integer) As Integer 
[...]
	nbFoyers = 0
	nbEnfants = 0
[... super code qui marche bien (vérifié avec des MsgBox) ]
 
End Sub
Quelqu'un saurait comment je peux récupérer les valeurs de mes deux variables nbEnfants et nbFoyers dans ma procédure principale (calcStats) ?

Merci d'avance