[excel VBA] lien Word Fermé

Question

Bonjour, 
Créant une base de donnée sous Excel VBA, je souhaiterai pouvoir ouvrir une feuille Word en cliquant sur un bouton.
Exemple:
Dans une text box contenant le nom d'une société , en cliquant sur le bouton, cette manipulation ouvre ma feuille word enregistré sur mon bureau.
En changeant le nom de la société dans la text box, on ouvrira sa fiche word appropriée.
Merci d'avance.

ptibenou · Answer

Salut,

Un truc de ce style :


Dim MyWord As Word.Application
Set MyWord = New Word.Application

MyWord.Visible = True

MyWord.Documents.open ("W:\Dge\Doc DGE\C-7.doc")

Set MyExcel = Nothing

Tu devras rajouter dans les Références de ton projet "Microsoft Word XX Object Library" où XX représente un numéro de version. Pour ça rien de plus simple : Projet > Références...

od7373 · Answer

Bonjour,
J'ai bien essayer tes lignes de codes mais rien ne marche (ça peut surement venir de ma part d'ailleur)

J'ai essayer cette ligne de code:
  ActiveWorkbook.FollowHyperlink Address:="N:\feuilles_synthèse_fournisseur\MONOPANEL\feuille_synthese_produit_MONOPANEL.doc"End Sub"

Celle ci fonctionne bien mais mon pb est le suivant : je voudrai pouvoir ouvrir n'importe quel fichier word suivant suivant le type de produit sélectionné.( ici MONOPANEL) 
Je pense qu'à la place de MONOPANEL dans la ligne de code, il faudrait mettre un code qui copie le nom du produit... mais je ne sais pas lequel??

Merci