IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Appel de fonction depuis 3 classeurs différents


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé
    Homme Profil pro
    Inscrit en
    Novembre 2008
    Messages
    618
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Novembre 2008
    Messages : 618
    Par défaut Appel de fonction depuis 3 classeurs différents
    Bonjour,

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

    Merci d'avance.
    Julien

  2. #2
    Membre Expert
    Avatar de pijaku
    Homme Profil pro
    Inscrit en
    Août 2010
    Messages
    1 817
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Nord (Nord Pas de Calais)

    Informations forums :
    Inscription : Août 2010
    Messages : 1 817
    Billets dans le blog
    10
    Par défaut
    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

Discussions similaires

  1. Appeller une fonction depuis un autre site
    Par ProgVal dans le forum Langage
    Réponses: 3
    Dernier message: 03/12/2008, 18h01
  2. Appel de fonction depuis procédure stockée
    Par sasy22 dans le forum Langage SQL
    Réponses: 2
    Dernier message: 06/03/2008, 14h39
  3. Comment appeler une fonction depuis .Net ?
    Par bluecurve dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 04/07/2007, 19h00
  4. Réponses: 1
    Dernier message: 12/04/2007, 11h50
  5. Appel de fonction depuis une classe fille
    Par lhpp dans le forum Interfaces Graphiques en Java
    Réponses: 8
    Dernier message: 26/04/2006, 22h02

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo