Discussion :

[aurelien76]

Bonjour,

J'ai un soucis l'appel à une fonction VBA que je viens de créer.
Voici ma fonction :

Code :

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

1
2
3
4
5
 
Function decouper_parametre(chaineAdecouper As String,
    autreChaine As String) As Variant
 -MON CODE -
End Function

J'appelle ma fonction de cette manière decouper_parametre("pierre;richard",";") en passant les 2 chaines de caratères que je veux mais ça ne fonctionne pas il me dit que j'ai une erreur de syntaxe. Manifestement, je ne sais pas passer plusieurs paramètres à une fonction. Un petit coup de main svp ?

[BlueMonkey]

Salut,

En fait c'est les conventions VBA qui sont (très) perturbantes lorsqu'on à quelques notions de programmations dans d'autres langage courant. (C++, Java ...)

Sous VBA, les appels de fonctions peuvent se faire sans mettre de parenthèses entre la fonction et les arguments.
Cette possibilité devient obligation lorsqu'il y a plus d'un argument.
Donc decouper_parametre("pierre;richard",";") doit s'écrire decouper_parametre "pierre;richard" , ";".
Si toutefois tu es trop perturbé par le fait de ne pas pouvoir mettre de parenthèses, tu peux faire précéder l'appel de fonction par le mot clé Call.
ex : Call decouper_parametre("pierre;richard",";")

[aurelien76]

Bonjour,

Ah ok merci de l'info. Mais j'ai un autre problème maitenant que j'arrive à envoyer mes paramètres à ma fonction je n'arrive pas à retourner le résultat de ma fonction (encore erreur de syntaxe de ma part) :

Code :

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

1
2
3
4
5
6
 
Function decouper_parametre(chaineAdecouper As Variant, separateur As String) As Variant
       Dim resulat as Variant
'le reste de mon code... et 
        decouper_parametre = resultat
End Function

Dans ma procédure principal j'ai ceci

Code :

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

1
2
3
 
Dim listeParam as Variant
listeParam= decouper_parametre Me.OpenArgs, ";"

C'est la récupération dans la variable listeParam qui pose problème, VBA me dit : "Attendu : fin d'instruction"

Merci d'avance de ton aide.

[BlueMonkey]

Re.

Ahh ... un cas que j'avais oublié.
Dans le cas où tu affecte le résultat d'une fonction à une variable, il faut mettre les parenthèses entre le nom de fonction, et les paramètres.

Code :

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

1
2
Dim listeParam as Variant
listeParam= decouper_parametre(Me.OpenArgs, ";")

[Invité]

Bonjour

Que de mélanges dans les termes, il ne faut confondre une fonction et une routine.

Une fonction est faite pour retourner une valeur que l'on attribue en général à une variable.
Donc on n'appelle pas une fonction.

Ex :

Code :

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

1
2
3
Public Function Multi(lngValeur as long) as Long
     Multi = lngValeur*2
End Function

et on l'utilise

Code :

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

1
2
Dim Result as long
Result = Multi(2)

Voilà comment on utilise une fonction.

Une routine (ou Sub) est faite pour réaliser des traitements.

Soit on l'appelle par Call avec les paramètres entre parenthèses, soit sans Call et sans parenthèse pour les paramètres.

Voilà.

Un petit tuto à lire : http://mhubiche.developpez.com/vba/f...axes/bases/#LI

Philippe

[aurelien76]

Bonjour,

D'accord merci beaucoup pour ses informations messieurs, je lirai le lien avec attention.

[BlueMonkey]

Bonjour,

Que de mélanges dans les termes [...]
Une fonction est faite pour retourner une valeur que l'on attribue en général à une variable.
Donc on n'appelle pas une fonction.
[...]

Une routine (ou Sub) est faite pour réaliser des traitements.
Soit on l'appelle par Call avec les paramètres entre parenthèses, soit sans Call et sans parenthèse pour les paramètres.

Pour moi la seule différence entre une fonction et une routine est que la fonction est faite pour retourner un résultat.
Mais comme on le voit dans les exemples suivants, la différence s'arrête là.

En effet :
- Rien n'empêche une fonction de faire du traitement.
Le cas le plus courant où une fonction fait du traitement, est lorsqu'une fonction renvoie un code d'erreur
après avoir effectué un traitement.

- On peut aussi bien faire un appel (Call)à une fonction qu'a une routine.
En effet, toujours dans le cas où une fonction retourne un code d'erreur, suivant ce que l'utilisateur souhaite faire,
il pourra très bien :
...appeler la fonction en récupérant le code d'erreur erreur = MaFonction("commande",3).
...appeler la fonction sans récupérer le code d'erreur Call MaFonction("commande",3).

Lorsque je parle "d'appel à une fonction", je parle au sens généralement utilisé en informatique.

Plus généralement, le VBA est suffisamment souple pour supporter différentes conventions d'écriture.
Peut être même trop souple (ex : il est possible de déclarer une fonction function sans spécifier de paramètre de retour, même avec Option Explicit).
L'important étant de se fixer des règles d'écritures et de s'y tenir afin que le programme dans son ensemble soit homogène,
surtout s'il est écrit/maintenu par plusieurs personnes.

A+

[Edit] Pour les appels de fonction et routine voir cours VBA §Instruction et règle d'appel. page 32.