VBA Ouvrir Fichier word depuis Excel

[Floorfiler]

Bonjour,

Je souhaite pouvoir ouvrir un fichier Word depuis Excel

Les formules suivantes fonctionnent:

ThisWorkBook.FollowHyperlink(range("A1").Text)

ThisWorkBook.FollowHyperlink(CheminCompletDuFichierWord)

Cependant je souhaite que le nom du fichier change en fonction du contenu d'un textbox qui est dans mon cas le nom de famille.

ThisWorkBook.FollowHyperlink(ValeurTextbox.doc)

Des idées ?

 

[Floorfiler]

Re : VBA Ouvrir Fichier word depuis Excel

En gros il faut que je récupère la valeur de mon textbox nom pour qu'il puisse l'intégrer dans le chemin du fichier.

 

[Floorfiler]

Re : VBA Ouvrir Fichier word depuis Excel

svp j'ai vraiment besoin de votre aide. Ca semble assez simple mais je n'est pas trouver de solution sur le forum.

 

[kiki29]

Re : VBA Ouvrir Fichier word depuis Excel

Salut,en utilisant le macro recorder tu devrais parvenir après optimisation manuelle
à qqch comme

Option Explicit

Sub Tst()
Dim sChemin As String
    sChemin = "C:\Transfert\" & UserForm1.TextBox1.Text
    Feuil1.Hyperlinks.Add Anchor:=Feuil1.Range("G16"), Address:=sChemin, TextToDisplay:="Essai"
End Sub

Il y aurait lieu peut-être lieu de controler que sChemin n'est pas vide voire que le fichier existe via une fonction adéquate