Discussion :

[Airahn]

Bonjour,

J'exécute des fonctions dont le nom est listées dans un tableau et j'aimerai pouvoir récupérer la valeur retournée par ses fonctions.
Comme je passe pas une variable de type string j'utilise Application.run et d'après cette page :https://docs.microsoft.com/fr-fr/off...pplication.run la méthode Run retourne la valeur de la fonction.
J'aimerai donc savoir comment récupérer ce retour, ou peut être une autre méthode équivalente.

Merci d'avance

[Philippe Tulliez]

Bonjour,
Voici une exemple d'appel à une procédure nommée myTest présente dans une macro complémentaire nommée "MagicOfficeTools.xlam" an lui passant un argument

Code de la procédure dans le classeur xlam

Code :

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

1
2
3
Function MyTest(Optional Name As String) As String
  MyTest = "Bonjour " & Name & vbCrLf & "Ceci est un test de retour de valeur"
End Function

Code de la procédure appelante présent dans un classeur xlsm

Code :

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

1
2
3
4
5
6
7
Sub TestRun()
  Const AddInName As String = "MagicOfficeTools.xlam"
  Dim myResponse As String
  Dim MyResult As String
  MyResult = Application.Run("'" & AddInName & "'!myTest", "Philippe")
  MsgBox MyResult
End Sub

Comme l'argument Name est optionnel, il est donc possible d'évoquer cette procédure sans passer d'argument et ainsi de voir la syntaxe d'appel s'il n'y a pas d'argument

Code :

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

  MyResult = Application.Run("'" & AddInName & "'!myTest")

[Airahn]

Merci Beaucoup,

J'ai pas bien compris l'intérêt de la macro complémentaire, j'ai put faire sans et il me semblait avoir déjà essayer cette syntaxe du app.run mais maintenant ça fonctionne donc je vais pas m'en plaindre.
Je suppose que j'avais dû faire une erreur bête quelque part.

Encore merci et bonne soirée

[Philippe Tulliez]

Bonjour,

J'ai pas bien compris l'intérêt de la macro complémentaire

J'ai tout simplement fait ce test avec une macro complémentaire mais cela fonctionne également avec un classeur xlsm et comme je suis sur un projet où j'utilise un Add-In, je n'ai pas dû ouvrir un autre classeur pour vous répondre.

Par contre, il y a beaucoup d'intérêt d'utiliser une macro complémentaire lorsque l'on écrit une application surtout pour des tiers. La même procédure peut-être utilisée par plusieurs classeurs et en cas de dépannage, on évite de bloquer le client lors de modification.
On peut également créer un menu dynamique et appeler ainsi les procédures présentes dans la macro complémentaire sans passer justement par Application.Run