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 Discussion :

Création d'un objet access en Excel (sans access)


Sujet :

VBA

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    44
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 44
    Par défaut Création d'un objet access en Excel (sans access)
    Bonjour à tous,

    je souhaite exécuter une fonction Access via mes macros Excel.

    Pour cela je dois déclarer un objet pour ouvrir mon fichier .mdb et ensuite lui appeler la fonction.

    Je n'ai aucun souci pour faire fonctionner ce code sur ma machine, par contre mon but final est de le faire fonctionner sur une machine sans Access.

    Mon code est le suivant

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim objDBase As Object 
    Set objDBase = GetObject("c:\temp\MaBase.mdb")
    Lorsque je mets ce code, j'obtiens l'erreur suivante :
    "Erreur d'éxecution 432 : Nom du fichier ou de la classe introuvable lors de l'opération d'automation
    Quand je teste avec le code suivant

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim objDBase As Object 
    Set objDBase = GetObject("c:\temp\MaBase.mdb", "Acces.Application")
    J'obtiens l'erreur suivante :
    Erreur d'éxecution 429 : Un composant activeX ne peut pas créer l'objet
    J'ai bien réferencé mon fichier .olb permettant l'appel des objets access et la je commence à pautager bien comme il faut.

    Ma fonction complete ce présente comme suit


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Sub MaFonction
    Dim appAccess As Access.Application
    Dim objDBase As Object
    Set objDBase = GetObject("c:\temp\zolart.mdb", "Acces.Application") 'lBdd)
     
    Set appAccess = objDBase.Parent
    Call appAccess.Run("IntegrFichier")
     
    End sub
    Est ce que quelqu'un aurait une idée pour soit passer la ligne qui plante, soit contourner le problème ?
    Sachant qu'il n'est pas possible d'installer Access sur la machine devant exécuter ce code.

    Merci d'avance pour votre retour

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Ce que tu veux faire n'est pas possible (peut-être avec le Runtime, mais je ne connais pas).

    Ton code est fait pour piloter Access, hors si Access n'est pas présent sur le poste ce n'est pas possible.

    La seule chose que tu peux faire à partir d'Excel sur Access (sans Access mais uniquement le fichier mdb) c'est l'accès aux données en utilisation ADO ou DAO.

    Philippe

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    44
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 44
    Par défaut
    Merci pour la réponse.
    Du coup je parcours les lignes de mon fichier et je les intègre une après l'autre.

    Ce qui au final n'est pas beaucoup plus long que d'appeler les fonctionnalités d'accès (sur une machine ayant access).
    Pour 30.000 lignes cela prend 1 minute de plus.

    Encore merci pour l'aide

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Données d'Access vers Excel sans les macros
    Par tofflower dans le forum VBA Access
    Réponses: 1
    Dernier message: 25/01/2013, 18h35
  2. [AC-2007] Export d' Excel vers Access avec VBA depuis Access
    Par rabihm81 dans le forum VBA Access
    Réponses: 1
    Dernier message: 09/06/2009, 15h56
  3. Access vers excel "sans avoir excel installer"
    Par psyko72 dans le forum VB.NET
    Réponses: 16
    Dernier message: 23/08/2007, 13h50
  4. manipuler les objets graphique d'excel sur access
    Par technopole dans le forum Access
    Réponses: 4
    Dernier message: 21/07/2006, 10h37
  5. [VBA-E][Access] Exécuter un module Access dans Excel
    Par Amara dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 28/03/2006, 09h42

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