Bonjour,
Quelqu'un peut m'expliquer cette ligne SVP :
C'est surtout les optional que je ne comprend pasCode:Private Sub Fonction_MD_Client (Optional AI, Optional B)
CDT
Version imprimable
Bonjour,
Quelqu'un peut m'expliquer cette ligne SVP :
C'est surtout les optional que je ne comprend pasCode:Private Sub Fonction_MD_Client (Optional AI, Optional B)
CDT
Salut,
Il y a un truc génial, cela s'appelle l'aide.
Il suffit de mettre le mot en surbrillance (en double cliquant dessus) et d'appuyer sur la touche F1.
Philippe
Si je demande c'est que je ne comprend pas l'aide ni cette notion de paramètre optionnel...
Bon,jour,
Optional veux simplement dire que les arguments ne sont pas obligatoires dans l'appel de la Sub (le mot "Fonction" dans le nom de la Sub peu prêter à confusion !).
Quand il y a des argument optionnels dans une procédure ou fonction, ils doivent obligatoirement être situés en dernier donc, après les arguments obligatoires exemple bidon :
Les arguments optionnels peuvent avoir une valeur par défaut re -exemple bidon :Code:
1
2
3
4
5
6
7
8
9
10
11
12 Sub Test() Fonction_MD_Client "monkeyDlufy ", "n'est pas content ", "car repris par Philippe !" End Sub Sub Fonction_MD_Client(VarObligatoire As String, Optional AI, Optional B) MsgBox VarObligatoire & IIf(IsMissing(AI), "", AI) & IIf(IsMissing(B), "", B) End Sub
Tu peux remarquer que quand tu appelles une Sub ou Function, les arguments optionnels sont entourés de crochets dans l'infobulle !Code:
1
2
3
4
5
6
7
8
9
10
11
12 Sub Test() Fonction_MD_Client "monkeyDlufy " End Sub Sub Fonction_MD_Client(VarObligatoire As String, Optional AI As String = "Valeur par défaut pour AI, ", Optional B As String = "Valeur par défaut pour B") MsgBox VarObligatoire & AI & B End Sub