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 :

Forcer VBA à enlever/ajouter références à cause de Office 64 bits [XL-2010]


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Homme Profil pro
    Bénévole super actif pour association sportive
    Inscrit en
    Février 2015
    Messages
    64
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Bénévole super actif pour association sportive

    Informations forums :
    Inscription : Février 2015
    Messages : 64
    Points : 66
    Points
    66
    Par défaut Forcer VBA à enlever/ajouter références à cause de Office 64 bits
    Bonjour à tous,

    Pour expliquer mon problème (le titre est sans doute confus), je diffuse aujourd'hui un fichier Excel intégrant des macros qui font référence à Microsoft Internet Controls et Microsoft HTML Object Library.
    Sur Office 32 bits aucun souci que ce soit en 2010 ou 2016.

    Le problème survient quand on passe sur Office 64 bits (que ce soit 2010 ou 2016), je récupère des erreurs de compilation de VBA à cause des objets de type InternetExplorer, et HTMLxxxxElement.

    Pour m'en débarrasser, j'ai trouvé une parade mais qui ne me convient pas : je vais sous VBA Editor dans Outils/Références, je désélectionne Microsoft Internet Controls et Microsoft HTML Object Library, je ferme la fenêtre et je les remets.
    Comme mes macros sont "protégées" par un mot de passe, y'a-t-il moyen de forcer cette désélection/sélection par VBA ou par une autre astuce car je ne pourrai pas le faire sur tous mes clients utilisant mon fichier.

    Merci de votre aide,
    à bientôt.

    Poussemousse

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    des références?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     Set IE = CreateObject("InternetExplorer.Application")

  3. #3
    Membre du Club
    Homme Profil pro
    Bénévole super actif pour association sportive
    Inscrit en
    Février 2015
    Messages
    64
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Bénévole super actif pour association sportive

    Informations forums :
    Inscription : Février 2015
    Messages : 64
    Points : 66
    Points
    66
    Par défaut
    Citation Envoyé par dysorthographie Voir le message
    Bonjour,
    des références?
    Oui pardon, voilà quelques exemples
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     Dim IE As InternetExplorer
     Dim FormIECherche As HTMLFormElement
     Dim FormIEBouton As HTMLFormElement
     Dim FormIEForm As HTMLFormElement

  4. #4
    Invité
    Invité(e)
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     Dim IE As Object
     Dim FormIECherche As Object 'Élément de IE pas besoin de CreateObject
     Dim FormIEBouton As Object 'Élément de IE pas besoin de CreateObject
     Dim FormIEForm As Object 'Élément de IE pas besoin de CreateObject
    Set IE = CreateObject("InternetExplorer.Application")
    décoches toutes références à IE dans ton projet, comme ça ça fonctionnera sur toutes les machines!

  5. #5
    Membre du Club
    Homme Profil pro
    Bénévole super actif pour association sportive
    Inscrit en
    Février 2015
    Messages
    64
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Bénévole super actif pour association sportive

    Informations forums :
    Inscription : Février 2015
    Messages : 64
    Points : 66
    Points
    66
    Par défaut RESOLU : Forcer VBA à enlever/ajouter références à cause de Office 64 bits
    Citation Envoyé par dysorthographie Voir le message
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     Dim IE As Object
     Dim FormIECherche As Object 'Élément de IE pas besoin de CreateObject
     Dim FormIEBouton As Object 'Élément de IE pas besoin de CreateObject
     Dim FormIEForm As Object 'Élément de IE pas besoin de CreateObject
    Set IE = CreateObject("InternetExplorer.Application")
    décoches toutes références à IE dans ton projet, comme ça ça fonctionnera sur toutes les machines!
    Merci @dysorthographie, ça marche impeccablement comme cela.
    Sujet résolu

    Néanmoins pour ceux qui voudraient faire ce que je cherchais initialement, très bons exemples fournis ici et là :
    http://www.vbaexpress.com/kb/getarticle.php?kb_id=267
    http://www.vbaexpress.com/kb/getarticle.php?kb_id=713
    http://www.vbaexpress.com/kb/getarticle.php?kb_id=272

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

Discussions similaires

  1. [VBA-Exel] Ajout automatique de références
    Par gloll dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 25/07/2006, 14h29
  2. Réponses: 6
    Dernier message: 11/10/2004, 15h43
  3. Réponses: 4
    Dernier message: 02/06/2004, 11h19
  4. [VBA-E] Ajouter des fonctions dans Excel
    Par Clezio dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 06/03/2004, 01h18
  5. [VBA-W] Ajouter un retour charriot
    Par FatalError dans le forum VBA Word
    Réponses: 3
    Dernier message: 18/12/2002, 15h35

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