Ouvrir avec Btn fichier chm

[MuscatMimi]

Bonsoir

je cherche a ouvrir un Fichier d'aide perso Aide.chm
sous WORD Milles excuses j'ai oublié des précision

j'ai cherché, sur le net et rien trouvé de concret
Quelqu(un aurait-il une idée??

merci d'avance
Cordialement

 

[soenda]

Re : Ouvrir avec Btn fichier chm

Bonsoir le fil, Christian

Au vu des infos que tu nous communiques, tout ce que je peut dire c'est :
pour ouvrir un fichier .chm, il suffit de double-cliquer dessus.

Voir PJ.

A plus

 

[MuscatMimi]

Re : Ouvrir avec Btn fichier chm

Bonsoir soanda et le Forum

pardon j'ai oublié de noté que c'était avec Word

Merci
Bonne soirée

 

[Staple1600]

Re : Ouvrir avec Btn fichier chm

Bonsoir



Un fichier *.chm ne s'ouvre pas par défaut avec Word 😕

Pourquoi vouloir l'ouvrir avec Word?

Des infos plus détaillés ici (par exemple)
http://support.microsoft.com/kb/828419/fr

 

[MuscatMimi]

Re : Ouvrir avec Btn fichier chm

Bonsoir staple

j'ai fais une petite appli courrier sous word
j'ai créé un fichier chm, et je désire,via un bouton dans mon usf
pouvoir ouvrir ce fichier chm

voila,voila

bonne soirée

 

[Staple1600]

Re : Ouvrir avec Btn fichier chm

Re

Voir du coté de Shell peut-être

edition: exemple

Sub OuvriR_FICHIER_CHM()
Shell "C:\WINDOWS\hh.exe C:\Temp\fichier.chm", vbMaximizedFocus
End Sub

 

[MuscatMimi]

Re : Ouvrir avec Btn fichier chm

Bonjour Staple et le Forum

Désolé pour le retard ,pour répondre

mais soucis
Merci pour ton Code,mais je ne voulais pas noter un nom de répertoire dans mon code,car si je donne le fichier a une personne ,il ne saura pas s'en servir,pour modifier le code

Voici ce que j'ai réalisé

Sub teste()
Dim retval$, mondossier$, monfichier '
mondossier = ThisWorkbook.Path & "\"
monfichier = "Christian.chm" 'Nom du Fichier a Ouvrir
retval = "C:\WINDOWS\hh.exe " & mondossier & monfichier
Shell retval, vbNormalFocus ' vbMaximizedFocus
End Sub

Bonne journée
Cordialement