Ouvrir un fichier depuis word

Contenu du snippet

ce code vous permet d'ouvrir un fichier qelconque lorsque vous travaillez avec word.

Source / Exemple :


Sub cmdSimuleDisque()
'   Déclaration de toutes vos variables
Dim Start As Object
Dim CommonDialog As Object
Set Start = CreateObject("Word.Application")
'   Ceci vous permet de definir quel application utiliser
Shell "c:\Program Files\Microsoft Office\Office\winword.exe"
SendKeys "%(f)(^o c:\)", True ' Envoie la commande ALT + la touche ouvrir
'   Ici vous simulez l'ouverture du menu fichier + ouvrir + disque dur
'   simboliser par c:\
SendKeys "%(o)" '    Envoie la suite de la simulation de touche ALT + ouvrir le fichier"
'   A ce moment vous lui demandez d'ouvrir le menu déroulant et de choisir le disque dur
End Sub

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.