[RESOLU]Ouvrir un document word via excel

[nrdz83]

Bonjour à tous,

je cherche à ouvrir un document Word via excel pour cela j'utilise le code ci-dessous, qui m'ouvre la fenêtre de sélection.

ça fonctionne sauf que quand je clique sur le bouton OUvrir rien ne se passe.

Pourriez-vous m'aiguillez sur cette erreur?

Par avance merci

Sub Ouvre_Formation_wordpubli()

Dim QuelFichier
QuelFichier = Application.GetOpenFilename("Fichiersword/doc/docx/docm/dotm/dot,*.doc;*.docx;*.docm;*.dotm;*.dot", , "Sélectionnez votre source de données")
If QuelFichier <> False Then
MsgBox QuelFichier
Else
MsgBox "Vous n'avez pas sélectionné de fichier"
End If


End Sub

par avance merci

 

[Pierrot93]

Re : Ouvrir un document word via excel

Re,

A quoi bon te répondre si tu ne donnes pas suite aux réponses données...
https://www.excel-downloads.com/threads/resolu-obliger-la-selection-dun-option-button.231584/

@+

 

[nrdz83]

Re : Ouvrir un document word via excel

Bonjour pierrot je suis désolé mais j'étais persuadé avoir répondu et cloturé le sujet.

Désolé pour cet imbroglio je rectifie de suite ce sujet

Amitiés

 

[Pierrot93]

Re : Ouvrir un document word via excel

Re,

une façon de faire parmi d'autres... :

ThisWorkbook.FollowHyperlink "C:\MesDocs\Word\Test.docx"

bon après midi
@+

 

[Pierrot93]

Re : Ouvrir un document word via excel

Re,

A modifier comme suit dans ton cas :

ThisWorkbook.FollowHyperlink QuelFichier

 

[nrdz83]

Re : Ouvrir un document word via excel

Merci je vais creuser bonne fin de journée