Discussion :

[thibault.retureau]

Bonjour,
J'ai créé une base access avec plusieurs tables, sur lesquelles je fais ensuite une query.
Dans cette query, je fais appel a une fonction que j'ai définie dans les modules d'access.
Cette fonction me permet de renvoyer dans la query un resultat ( dans mon cas une interpolation) qu'il me serait difficile de coder directement dans le sql de la query.
J'ai ensuite besoin de faire appel a cette query dans xls. J'ai donc créé une requete en vb qui recupere les donnees de cette query.
Toutefois, lorsque j'execute cette requete avec xls j'ai un message qui me dit que la fonction est inconnue.
Que faut-il faire pour que xls "sache" que cette fonction est définie dans les modules d'access ?
Merci d'avance pour votre aide

[fred65200]

bonjour
tu peux essayer le code suivant

Code :

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

1
2
3
4
5
6
7
Option Explicit
 
Sub test()
Dim Toto As String
Toto = Application.Run("Le_Nom_Du_Fichier_Qui_Contient_La_Fonction!LaFonction", Argument1, Argument2)
MsgBox Toto
End Sub

Tu peux aussi ajouter une reférence à base Acces dans ton classeur Excel. Pas sûr, à tester.

Cordialemnt

[thibault.retureau]

Bonjour Fred,
Merci pour ta réponse. C'est la première fois que je poste un lien et je suis impressione par la réqctivité.
Le truc c'est que la fonction en question est appelée dans la query elle même et bien imbriquée dans le sql. Il m'est donc difficile de l'extraire. Je ne peux donc me servir de ta premiere solution.
En ce qui concerne la deuxieme solution que tu proposes, comment fait on ca , la reference a la base access dans xls ?

[fred65200]

bonjour,

Je n'ai pas réussi à ajouter la référence au classeur.
Je sèche.
Il ne reste qu'à attendre qu'un pro passe par là.
Cordialement