Ouvrir Word ou acrobat reader

Bonsoir Michel,
?lequel choisis:
'*****
Sub runDocword()
Dim sw
sw = Shell("winword", 1)
AppActivate sw
SendKeys "^o", True

End Sub
'****

"Michel.Girard" <michel.girard@club-internet.fr> a écrit dans le message de
news: uUsxOG2HFHA.236@TK2MSFTNGP14.phx.gbl...

Bonsoir
Je souhaite par macro lancer un document Word ou Pdf
Je n'ai pas trouver sur Excelabo.net
Merci beaucoup
Michel

bonjour Michel,

le plus simple est de mettre sur la feuille de calcul,
un lien hypertexte qui pointe vert ton fichier.
voir au menu, Insertion, Lien hypertexte

isabelle

Bonsoir
Je souhaite par macro lancer un document Word ou Pdf
Je n'ai pas trouver sur Excelabo.net
Merci beaucoup
Michel

Une solution parmi d'autres (code dans un module ordinaire) :

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Sub ShellOuvre()
Dim fich
fich = "D:Persocession.pdf" 'à adapter
ShellExecute 0, "open", fich, "", "", 0
End Sub

--
Gaenonius

Bonsoir
Je souhaite par macro lancer un document Word ou Pdf
Je n'ai pas trouver sur Excelabo.net
Merci beaucoup
Michel