[VBA] Fonction non définie dans l'expression

Bonjour à tous,
pour répondre à mon problème j'ai tenté de suivre les instructions trouvées dans la FAQ ICI mais rien n'y fait...:(

J'ai copié-collé le code d'une fonction dans un module d'une nouvelle base de données.
Lorsque je veux l'utiliser dans une requête, j'obtiens le message "Fonction non définie dans l'expression".

Or la fonction ne pose aucun problème dans la BD d'origine.

Par ailleurs, dans la nouvelle BD, dans Outils/Références, aucune bibliothèque n'est marquée comme manquante...

Auriez-vous une idée ?

Merci d'avance. :D

----edit-----------
il s'agit d'ACCESS 2003

Bonjour

Sans le code de la fonction cela sera dur, il faudrait le mettre

Starec

Salut,

Euh.... nan pas d'idées sans avoir plus de précision sur cette fonction (code, emplacement, déclaration etc...), et comment tu t'en sers dans la requête.

:oops: oupss, pardon :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Function classvar(x, Y) As Double ' transformation de la variable en classes centrées ' arguments : ' x = Variable ' y = amplitude de la classe ( ex 200 pour classes centrées de 200 ) If IsNull(x) Then classvar = Null: Exit Function If Val(x) = Y / 2 + (2 * Y * Int(Val(x) / (2 * Y))) Then x = Val(x) + 1 ' pour retrouver les mêmes classes que dans les anciennes fonctions de ' de regroupement lorsque variable vaut 2 fois Y ou Y/2 'classVAR = classVAR((CInt(x / Y)) * Y, 4) classvar = (CInt(x / Y)) * Y   End Function

---

la fonction est dans un module,
dans la requête j'écris :

Code:

---

nomduchamps : classvar([Matable].[monchamps] ; 100)

---

Re

Déclare ta fonction Public (à mettre devant le mot Function), et montre nous le bout de code où tu fais appel à elle.

Starec

Citation:

---

Envoyé par Starec

Re

Déclare ta fonction Public (à mettre devant le mot Function), et montre nous le bout de code où tu fais appel à elle.

Starec

---

Il fait appel à la fonction dans la requête. ;)

Rien que de déclarer Public devrait suffir.

J'ai ajouté Public mais hélas ça ne fonctionne toujours pas.

Citation:

---

Envoyé par Kikof

Il fait appel à la fonction dans la requête. ;)

---

Oui, c'est en effet dans ma requête que j'utilise la fonction.

Il y a quoi comme erreur maintenant ?
nomduchamp est de quel type ?

Il y a toujours le même message d'erreur "Fonction non définie dans l'expression".

monchamps est de type numérique réel double.

Je précise qu'il appartient à une table liée provenant d'une autre BD (je ne sais pas si c'est important).

J'ai utilisé la technique déjà (et je viens de me rendre compte au passage que ma fonction n'est pas déclarée en Public) et je ne vois pas ce qui cloche... :koi:

Ca y est je pense savoir ce qui cloche.
Compare ton entête de fonction avec la mienne ;)

Code:

---

Function Tranche(ByVal Valeur As Currency) As String

---

Et avec celle des sources.

Edit : ça me parait quand même bizarre que ça fonctionnait avant dans ton autre base :koi:

j'ai un très vague souvenir (mais sans être sûr que se soit vraiment ça) que la personne m'ayant donné cette fonction, m'avait dit (y a un bail...) d'aller dans Outil/Référence et de faire je ne sais plus trop quelle manip....
Mais là j'ai décoché puis recoché toutes les bibliothèques présentes dans la BD originale (dans laquelle la fonction fonctionne) mais sans succès...:calim2:

----edit----
viens de voir ton second post, je teste.

Re

Ta fonction est bizarre, car ici

Code:

---

1 2	classvar = (CInt(x / Y)) * Y

---

tu fais une conversion en entier, alors que tu récupére des données sans type, en plus en double, tu devrais avoir une erreur de type incompatible, ce qui a priori n'est pas le cas.

est-ce que les données de la base d'origine (où était la fonction) sont les mêmes que la base actuelle ?

Starec

Personnellement, au niveau des références je n'ai rien de spécial de coché.

Citation:

---

Envoyé par Starec

est-ce que les données de la base d'origine (où était la fonction) sont les mêmes que la base actuelle ?

---

Oui, j'ai importé une table pour faire le test, ça fonctionne dans une BD et pas dans l'autre, avec exactement les mêmes données.

Citation:

---

Envoyé par Starec

tu fais une conversion en entier, alors que tu récupére des données sans type, en plus en double, tu devrais avoir une erreur de type incompatible, ce qui a priori n'est pas le cas.

---

En fait au final on récupère bien un entier ; par exemple si la valeur X vaut 203, et qu'on a indiqué une classe d'intervalle Y de 100, on récupère l'entier 200.

Ceci me fait dire que cette fonction est un peu différente de celle que m'a indiqué Kikof, qui renvoie du texte.
Du coup j'ai pas trop su quoi faire avec...

Mais bon, comme vous vous en rendez compte je suis une bille en prog, donc je dis peut-être des bêtises...

Citation:

---

Envoyé par Kikof

Personnellement, au niveau des références je n'ai rien de spécial de coché.

---

Oui, je dois sûrement me tromper et confondre avec autre chose.

Bon ben c'est du chinois pour moi, car j'ai remplacé le nom "classvar" par "test", sans rien changer d'autre, et ça marche...8O 8O 8O

Mon pb est donc résolu et je vous remercie beaucoup de votr aide !

Toutefois, si vous avez une explication, je suis preneur !

Je crois que je viens de comprendre :
j'ai intitulé mon module comme ma fonction ! Cela doit générer un conflit quelquepart !