Bonjour,
Depuis un formulaire je souhaite ouvrir à l'aide d'un bouton un document PDF que je dois remplir avant de l'imprimer.
J'ai essayé avec ce code
mais ça ne fonctionne pas. J'ai regarder dans les modules macro mais je n'ai pas trouvé comment faire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub Commande69_Click() Dim strPath As String, objShell As Object strPath = "Z:\gest\Attestation" Set objShell = CreateObject("Shell.Application") objShell.Open (strPath) ' ou 'objShell.Explore (strPath) End Sub
Pourriez-vous me conseiller ?
Cordialement
Partager