dans un code VBA, utiliser une fonction définie dans mon classeur de macros .xla

Bonjour,

J'au une fonction définie dans mon classeur de macro .xla qui est activée à l'ouverture d'Excel :

Function Lien_Maps(LatLong As String) As String


Dans une cellule de mon classeur de travail, elle fonctionne bien, par exemple "=Lien_Maps(K315)" donne le bon résultat

Mais j'aurais besoin de l'utiliser dans un code VBA, et là j'ai l'erreur "Sub ou Function non définie".

Comment faut-il faire ?

Merci.

Bonjour,

une possibilité :

Dans la macro complémentaire :

Code:

---

1 2 3

Function toto(a As Long) toto = "Coucou" & a End Function

---

Dans un autre classeur

Code:

---

a = Application.Run("'test function.xlam'!toto", 25)

---

a renvoie "Coucou25"

si le nom du fichier de la macro complémentaire contient des espaces, l'entourer d'apostrophes

Super merci

Hello,

Il est de bonne pratique de définir la visibilité des fonctions ou procédures (Public / Private), afin de limiter l'utilisation de ces dernières à qui de droit.

Code:

---

1 2 3 4 5 6 7 8 9

'// Fonction publique, peut être appelée par n'importe qui Public Function toto(a As Long) toto = GetMessage & a End Function   '// Fonction interne (ou privée), ne peut être appelée depuis l'exeterieur Private Function GetMessage() As String GetMessage = "Coucou" End Function

---