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

VBA Access Discussion :

VBA : ouvrir une macro depuis une autre BDD


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de crovette51101
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    73
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 73
    Par défaut VBA : ouvrir une macro depuis une autre BDD
    Bonjour,

    Je suis en train de réaliser un formulaire qui doit pouvoir m'executer un module dans le quel je dois lui demander d'executer une macro se situant sur une autre base de donnée, depuis 9h ce matin je cherche mais rien ne fonctionne!
    J'utilise Access 2000, la base dans laquel je travail s'appelle Ventes.mdb et la macro que je dois recuperer se situe dans la base Developpeur.mdb sous le nom "125 - PV_TEST"
    Merci de me donner un coup de main

  2. #2
    Expert confirmé
    Avatar de LedZeppII
    Homme Profil pro
    Maintenance données produits
    Inscrit en
    Décembre 2005
    Messages
    4 485
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Maintenance données produits
    Secteur : Distribution

    Informations forums :
    Inscription : Décembre 2005
    Messages : 4 485
    Par défaut
    Bonsoir,

    un petit exemple de code
    Code vb : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    Sub testExtMacro()
    Dim accApp As Access.Application
    Dim strDataBase As String
    Dim strMacro As String
     
    ' Remplacer X:\CheminComplet par le chemin complet jusqu'à la base
    strDataBase = "X:\CheminComplet\Developpeur.mdb"
    strMacro = "125 - PV_TEST"
     
    Set accApp = CreateObject("Access.Application")
    ' Juste le temps de la mise au point.
    ' Si ça fonctionne on peut enlever la ligne qui suit
    accApp.Visible = True
     
    accApp.OpenCurrentDatabase "E:\Mes Documents\Access\COMPTOIR_PWD.mdb", False
     
    accApp.DoCmd.RunMacro strMacro
    accApp.Quit
    Set accApp = Nothing
    End Sub
    A+

  3. #3
    Membre confirmé Avatar de crovette51101
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    73
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 73
    Par défaut
    Merci beaucoups LEDZEPP II d'avoir pris le temps de me répondre et meme de me mettre un code, je vais tester ca dans la matinée!
    bye.

Discussions similaires

  1. Réponses: 3
    Dernier message: 09/10/2015, 17h16
  2. Réponses: 5
    Dernier message: 06/04/2010, 13h50
  3. Lancer un UserForm d'un classeur depuis une macro d'un autre classeur.
    Par bruno.bel dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 03/03/2009, 22h38
  4. [vba]lancer une requete depuis une macro
    Par skyarnangel dans le forum VBA Access
    Réponses: 3
    Dernier message: 03/02/2009, 16h53
  5. Executer une macro depuis une autre
    Par dureiken dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 30/01/2009, 00h34

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