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 :

[VBA-Exel] Ajout automatique de références


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre régulier
    Inscrit en
    Juillet 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 10
    Par défaut [VBA-Exel] Ajout automatique de références
    Bonjour,

    J'ai crée un formulaire qui après une recherche sur mes feuilles donne la possibilité d'enregistrer un résultat en .doc. Cette fonctionnalité ne marche que si la références "Microsoft Word 9.0 Objet Library" est sélectionné. Seulement mon application sera utilisée par des gens ne sachant pas pour la plupart où ajouter cette références.

    Il y a-t-il une façon en VB de vérifier si la référence est séléctionnée et/ou la sélectionner dans le cas contraire.


    Merci pour votre aide

  2. #2
    Expert confirmé

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Par défaut
    bonjour

    pour lister les references actives dans le classeur contenant cette macro

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
      'necessite d'activer la référence
      '"Microsoft Visual Basic for Applications Extensibility 5.3 "
      Dim Ref  As Reference
      For Each Ref In ThisWorkbook.VBProject.References
      Debug.Print Ref.Name & "  --->  " & Ref.fullPath
      Next Ref


    pour ajouter une reference

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim x As String
    x = "C:\Program Files\Microsoft Office\Office10\MSWORD.OLB"
    ThisWorkbook.VBProject.References.addFromFile x

    il te restera à gérer les differentes versions d'Office installées sur les postes de travail ( noms et repertoires de stockages différents d'un poste à l'autre)


    bonne journée
    michel

  3. #3
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Hello Michel,

    Je profite de la circonstance pour poser la question à laquelle je n'ai pas de réponse
    Si l'une des references n'est pas activée, la liste obtenue indique-t-elle cette référence malgré tout ? (apparemment pas mais sait-on jamais )
    Par avance, merci
    Et merci pour toutes tes interventions

  4. #4
    Membre régulier
    Inscrit en
    Juillet 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 10
    Par défaut
    Merci le truc marche nickel si la référence Word n'est pas activée, mais plante (logique) dans le cas contraire. Et pour faire le listing des références déjà activées, il faut activer une autre référence.. Du coup ça tourne un peu en rond là, il n'y a pas moyen de vérifier que la référence word est activée sans activée l'autre ?

  5. #5
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    la liste des références activées.. est "sauvée" avec le fichier excel.. l'utilisateur final n'as pas besoin de l'activer.. le probléme qu'il peu avoir c'est que la référence n'existe pas sur sa machine..... (par exemple une version trop vieille de word..)

  6. #6
    Membre régulier
    Inscrit en
    Juillet 2006
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 10
    Par défaut
    Ah oui merci je viens de voir ça effectivement. Du coup je n'ai plus de problème, car je tourne sur un 2000 et la plupart des gens ont migrés sur XP.

    Merci beaucoup, j'aurai au moins appris à ajouter une réf.

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

Discussions similaires

  1. [VBA] Ajouter dynamiquement une référence
    Par jpharand dans le forum VBA Access
    Réponses: 23
    Dernier message: 16/04/2010, 23h28
  2. VBA pr ajout d'un Cci automatique !
    Par alextoul dans le forum VBA Outlook
    Réponses: 1
    Dernier message: 09/10/2007, 06h48
  3. [VBA-E] ajout de ligne automatique en fin de tableau
    Par zoumzoum59 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/06/2006, 21h13
  4. [VBA-E 97]Ajout automatique d'une colonne selon la date
    Par paflolo dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/03/2006, 09h35
  5. [VBA-E]ajout de ligne automatique
    Par deathsurfer dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 14/01/2006, 13h22

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