[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

bonjour

pour lister les references actives dans le classeur contenant cette macro

Code:

---

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:

---

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

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 :lol: )
Par avance, merci
Et merci pour toutes tes interventions

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 ?

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..)

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.