OVH Cloud OVH Cloud

Ouverture de fichier Word

2 réponses
Avatar
F
Bonsoir à tous,
voilà je galère encore sur mon ouverture de fichier .doc sur lequel un
publipostage est en place.
Donc, j'ai un fichier excel qui est ma base de fusion pour un
publipostage (word).
Je souhaite lancer ce fichier
"C:\Documents and Settings\Fabrice\Bureau\Cova2005"qui est un document
publipostage (j'insiste un peu là). Et ceci à partir d'excel(affectation
de macro à un bouton ou...).
Les 2 fichiers sont dans le même dossier.
J'ai essayé les liens hypertextes mais la procédure est trop longue
voire ne lance rien du tout :o(
J'ai aussi tenté d'adapter le code suivant envoyé par ChrisV mais je coince.

Private Sub ouvreWordDOC()
MyAppID = Shell _
("C:\Program Files\Microsoft Office\Office\Winword.EXE
C:\mailling\fusion.doc", 1)
AppActivate MyAppID
End Sub

Dernière info j'utilise la version 97 excel sous Xp

Merci encore pour votre aide....

2 réponses

Avatar
Hervé
Salut Fabrice,
Teste ceci, à lancer depuis Excel :

Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" ( _
ByVal hWnd As Long, _
ByVal lpszOp As String, _
ByVal lpszFile As String, _
ByVal lpszParams As String, _
ByVal lpszDir As String, _
ByVal FsShowCmd As Long) As Long

Declare Function FindWindow _
Lib "user32" _
Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long

Sub LancerProg()
'Adapter "C:maillingfusion.doc" suis pas sûr du bon chemin ???
ShellExecute FindWindow( _
vbNullString, _
Application.Caption), _
"open", "C:maillingfusion.doc", _
vbNullString, _
vbNullString, 1
End Sub

Hervé.

"" a écrit dans le message news:

Bonsoir à tous,
voilà je galère encore sur mon ouverture de fichier .doc sur lequel un
publipostage est en place.
Donc, j'ai un fichier excel qui est ma base de fusion pour un
publipostage (word).
Je souhaite lancer ce fichier
"C:Documents and SettingsFabriceBureauCova2005"qui est un document
publipostage (j'insiste un peu là). Et ceci à partir d'excel(affectation
de macro à un bouton ou...).
Les 2 fichiers sont dans le même dossier.
J'ai essayé les liens hypertextes mais la procédure est trop longue
voire ne lance rien du tout :o(
J'ai aussi tenté d'adapter le code suivant envoyé par ChrisV mais je
coince.


Private Sub ouvreWordDOC()
MyAppID = Shell _
("C:Program FilesMicrosoft OfficeOfficeWinword.EXE
C:maillingfusion.doc", 1)
AppActivate MyAppID
End Sub

Dernière info j'utilise la version 97 excel sous Xp

Merci encore pour votre aide....



Avatar
Daniel.j
Pour Office 97 c'est un truc comme cela:
MyAppID = Shell _
("C:Office97OfficeWinword.EXE C:maillingfusion.doc", 1)
AppActivate MyAppID
Verifie le chemin de winword.exe
et un p'tit tour ici pourrais t'aider:
http://dj.joss.free.fr/word.htm

--
Daniel
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Foire Aux Questions Microsoft Public Fr Excel
FAQ MPFE
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Adresse: http://dj.joss.free.fr/faq.htm


"" a écrit dans le message de news:

Bonsoir à tous,
voilà je galère encore sur mon ouverture de fichier .doc sur lequel un
publipostage est en place.
Donc, j'ai un fichier excel qui est ma base de fusion pour un
publipostage (word).
Je souhaite lancer ce fichier
"C:Documents and SettingsFabriceBureauCova2005"qui est un document
publipostage (j'insiste un peu là). Et ceci à partir d'excel(affectation
de macro à un bouton ou...).
Les 2 fichiers sont dans le même dossier.
J'ai essayé les liens hypertextes mais la procédure est trop longue
voire ne lance rien du tout :o(
J'ai aussi tenté d'adapter le code suivant envoyé par ChrisV mais je
coince.


Private Sub ouvreWordDOC()
MyAppID = Shell _
("C:Program FilesMicrosoft OfficeOfficeWinword.EXE
C:maillingfusion.doc", 1)
AppActivate MyAppID
End Sub

Dernière info j'utilise la version 97 excel sous Xp

Merci encore pour votre aide....