Discussion :

[stargates01]

Bonjour à tous,

J'ai trouvé sur le forum comment lancée une procédure Access par une macro excel. En revanche je n'ai pas trouvé comment faire pour récupérer dans ma macro Excel une valeur calculée par la procédure Access . Voici le code de ma macro Excel :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Dim oAcApp As Object 'Access.Application
Dim strSQL, Taux As String
 
Set oAcApp = CreateObject("Access.Application")
 
'Ouvrir la base de données
oAcApp.OpenCurrentDatabase "C:\Documents and Settings\Base Access.mdb", False
Taux = ActiveWorkbook.ActiveSheet.Range("B2").Value
'Exécuter la macro
oAcApp.Run "Prime", Taux

Ce code me permet bien de lancer la procédure "Prime" avec la variable "Taux". Mais je ne sais pas comment faire pour récupérer la valeur d'une variable string déclarée puis calculée par la macro Access. Auriez-vous une piste ?

Merci
Stargates01

[Jean-Philippe André]

Salut,

tu dois faire une petite erreur de conception du coup, vu qu'une procédure ne renvoie aucune valeur, au contraire d'une fonction

S'il s'agit d'une valeur à stocker, tu peux voir si la donnée peut être soit mise dans une table, soit copiée dans un fichier.

[stargates01]

Merci de ta réponse. Tu as raison en fait c'est une fonction ("Prime") que j'appelle depuis excel et c'est bien la valeur de la fonction que je voudrais récupérer. Je pourrai en effet mettre cette valeur dans une table access, puis récuper la valeur en lisant la table depuis excel, mais je me demandais s'il n'y avait pas plus simple pour essayer de récupérer directement la valeur de la fonction.

Merci
Stargates01