- [VBA excel] Modifier un fichier Word a partir d'une feuille excel [Résolu]
- Ouvrir un fichier word sans connaître le chemin de l'application
- [vba] Automatiser Word à partir d'Excel [Résolu]
- Vérification si fichier Word ouvert depuis VBA Excel
- [Déplacé VB6 --> VBA] ouvrir un fichier word protégé par mot de passe avec une m
Ouvrir un fichier Word à partir d'Excel dont je connais le chemin [Résolu]
Signaler
RenuyMa
RenuyMa
- Messages postés
- 3
- Date d'inscription
- jeudi 26 janvier 2006
- Statut
- Membre
- Dernière intervention
- 19 mars 2006
RenuyMa
- Messages postés
- 3
- Date d'inscription
- jeudi 26 janvier 2006
- Statut
- Membre
- Dernière intervention
- 19 mars 2006
A voir également:
- Ouvrir un fichier Word à partir d'Excel dont je connais le chemin
- Ouvrir un fichier word depuis excel 2010 ✓ - Forum - VB.NET
- Ouvrir un fichier Word ou excel avec un chemin donnee ✓ - Forum - Visual Basic 6
- Ouvrir un fichier word par vba exel ✓ - Forum - Visual Basic 6
- Ouvrir un fichier word d'un fichier excel ✓ - Forum - Visual Basic 6
- [VBA excel] Modifier un fichier Word a partir d'une feuille excel ✓ - Forum - Visual Basic 6
4 réponses
cs_Willi
- Messages postés
- 2375
- Date d'inscription
- jeudi 12 juillet 2001
- Statut
- Modérateur
- Dernière intervention
- 15 décembre 2018
Bonsoir,
Voici un exemple tout prêt ^^
Private 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
Const SW_SHOWMAXIMIZED = 3
Private Sub CommandButton1_Click()
ShellExecute 0, vbNullString, "C:\TonFichierWord.doc", vbNullString, "C:", SW_SHOWMAXIMIZED
End Sub
Voila
Voici un exemple tout prêt ^^
Private 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
Const SW_SHOWMAXIMIZED = 3
Private Sub CommandButton1_Click()
ShellExecute 0, vbNullString, "C:\TonFichierWord.doc", vbNullString, "C:", SW_SHOWMAXIMIZED
End Sub
Voila
michelxld
- Messages postés
- 402
- Date d'inscription
- vendredi 6 août 2004
- Statut
- Membre
- Dernière intervention
- 12 octobre 2008
bonjour Maïté , bonjour Willi
ci joint une autre possibilité
Private Sub CommandButton1_Click()
ThisWorkbook.FollowHyperlink "C:\Documents and Settings\michel\dossier\monDocument.doc", , True
End Sub
bonne journée
michel
ci joint une autre possibilité
Private Sub CommandButton1_Click()
ThisWorkbook.FollowHyperlink "C:\Documents and Settings\michel\dossier\monDocument.doc", , True
End Sub
bonne journée
michel