Discussion :

[juju05]

Bonjour,

Est-il d'appeler une fonction depuis des macros positionnées dans 3 classeurs différents ?

Merci d'avance.
Julien

[pijaku]

Bonjour,

Si j'ai bien compris...
Vous avez une fonction (dans l'exemple, la fonction Addition) située dans un classeur (dans l'exemple Classeur1.xlsm) dans un Module (ici Module2).
Vous souhaitez appeler cette fonction dans trois de vos codes situés dans trois classeurs différents.
Si oui :

Classeur1.xlsm, votre fonction dans le Module "Module2" :

Code :

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

1
2
3
Function Addition(Nb1 As Double, Nb2 As Double) As Double
Addition = Nb1 + Nb2
End Function

Dans vos trois classeurs, le code d'appel de cette fonction :

Code :

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

1
2
3
4
5
6
Sub Test_Run()
Dim Somme As Double
  Somme = Run("'C:\Users\franck\Travail\Excel\Classeur1.xlsm'!Module2.Addition", 1234.56, 654.32)
  Workbooks("Classeur1.xlsm").Close False
  MsgBox Somme
End Sub