Discussion :

[torquemada]

Bonjour à tous
J'ai lu cette contribution https://bidou.developpez.com/article/VBA/

J'avoue que je n'ai pas bien saisie le passage d'arguments à une procédure/ fonction

Voici un bout de code appelant une procédure nommée Valeur

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
If Co(i) <> Co(j) And Ro(i) <> Ro(j) Then
 
 
                 If (DeltaRo <= 2 And DeltaCo <= 2) Or MRo <= 2 And MCo <= 2 Then
                 X = WorksheetFunction.Min(MCo, DeltaCo)
                 Y = WorksheetFunction.Min(MRo, DeltaRo)
                 Valeur
                    GoTo Jump
                 End If
 End If

et voici la procédure qui modifie juste les valeurs d'un tableau en fonction des valeurs X etY

Code :

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

1
2
3
4
5
 
Sub Valeur()
 
If Not (X = 2 Or Y = 2) Then Score(i) = Score(i) + 1: Score(j) = Score(j) + 1
End Sub

Cela marche très bien,mais est ce que j'aurai du essayer d'écire qqchose comme

Code :

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

1
2
3
 
Sub Valeur(ByRef X As Integer, ByRef Y As Integer, ByRef i As Integer, ByRef j As Integer)
End sub

mais à ce moment là comment appeler la procédure
J'avais essayé

Code :

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

Valeur(X,Y,i,j)

mais cela provoque une erreur de syntaxe

Ma question est donc: quand faut-il mettre des arguments et comment appeler la procédure avec des variables

Merci de m'avoir consacré de votre temps