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

[Marc-L]

Bonjour, bonjour !

Code :

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

1
2
3
4
5
6
7
8
Sub Message(SUJET$, VERBE$, COMP$, Optional TEMPS$)
    MsgBox SUJET & " " & VERBE & " " & COMP & " " & TEMPS
End Sub
 
 
Sub Demo()
    Message "Il", "fait", "beau", "aujourd'hui."
End Sub

_________________________________________________________________________________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …

[SfJ5Rpw8]

Bonjour,

lors de l'appel de ta procédure enlève les parenthèses..

[Philippe Tulliez]

Bonjour,
Il y a deux manières d'appeler une procédure Sub ayant des paramètres
Soit avec l'instruction Call, les parenthèses sont de rigueur pour passer les arguments

Code :

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

Call Valeur(5, 20, 100, 40)

Soit en appelant la procédure par son nom et là il ne faut pas de parenthèses

Code :

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

Valeur 5, 20, 100, 40

[torquemada]

Ok merci pour l'appel de la procédure.
Mais quels paramètres dois je mettre dans la définition de la procédure
Ceci est il correct

Code :

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

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

ou aurais je du mettre le tableau Score aussi ?

Code :

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

1
2
3
4
 
Sub Valeur(ByRef X As Integer, ByRef Y As Integer, ByRef i As Integer, ByRef j As Integer,ParamArray Score() as Integer)
If Not (X = 2 Or Y = 2) Then Score(i) = Score(i) + 1: Score(j) = Score(j) + 1
End Sub

ou rien du tout puisque les variables sont prises en compte malgré tout.

Code :

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

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

Quelle est la bonne syntaxe ?
Merci

[AlainTech]

Bonjour,

Si tes variables sont "prises en compte", c'est qu'elles sont déclarées en tête du module concerné ou Public dans un autre module.
Dans ce cas, il ne faut pas les passer en paramètres.

En pratique,

• si on veut écrire une routine ou fonction générique (réutilisable) sans devoir se soucier du nom des variables qu'elle traite, il vaut mieux faire un passage par paramètres.
• si le passage par paramètres rend l'écriture du code complexe comme dans un appel de fonctions ou routines en cascade, il est parfois préférable de déclarer certaines variables au niveau Module ou Public.
  Cette dernière façon de faire rend tes routines moins génériques car dépendantes du nom de la ou des variable(s) à traiter.

[torquemada]

Merci à tous et en particulier à AlainTech