Private Function probleme

Bonjour,
j'essaye de qualifier ma fonction de "Private":


mon instruction dans Feuil1 est la suivante :

Code:

---

1 2 3 4 5 6 7

Sub Test()   'Vous pouvez aussi utiliser la syntaxe suivante: MsgBox Multiplication(dblNombre:=40) 'Vous n'avez pas besoin d'ajouter "dblNombre:=" lorsque les données sont 'passées à la fonction dans le même ordre que la déclaration des arguments. End Sub

---

ensuite dans le module j'ai :

Code:

---

1 2 3 4 5 6

'dblNombre est l'argument (la valeur transmise à la fonction). Function Multiplication(dblNombre As Double) As Double 'Multiplie l'argument dblNombre par 2 et renvoie le résultat au nom 'de la fonction. Multiplication = dblNombre * 2 End Function

---

mais lorsque que je rajoute "Private" devant "Function" , j'ai une erreur de compilation.
quelqu'un pourrait il m'aider please.

bonjour awa123,

sans doute un problème de portée avec tes variables.
mets la procédure appelante dans le module de la function pour voir.
n'oublie pas non plus de déclarer tes variables (de préférence en tête de module).
option explicite en tête de module te rappellera à l'ordre sur ce dernier point.

bonne chance.
cordialement,

Bonjour.

Citation:

---

Envoyé par awa123

mais lorsque que je rajoute "Private" devant "Function" , j'ai une erreur de compilation.

---

Tout à fait normal !

Pourquoi déclarer la fonction privée alors qu'elle ne se trouve pas dans le module de classe de la procédure ? Quel est le but ?

Sinon placer la fonction dans le même module …


__________________________________________________________________________________________

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

Bonjour,
déclarer une fonction Private s'avère quelque foies utile:
cela permet d'utiliser des fonctions portant le même nom mais utilisable que dans le module.
bien sur la procédure d'appel de cette fonction n'est possible que du module.