ouvrir un pdf en VBA

Version imprimable

12/07/2011, 15h34
minot83

ouvrir un pdf en VBA

Salut :zoubi:

je souhaite lier un fichier pdf à chaque enregistrement (le nom du pdf sera le même que la clé primaire)
Plutôt que de recopier la colonne Id dans une seconde colonne hypertexte et d'associer".pdf" derrière, j'aimerais que cette manip se fasse directement sous VBA.

Les pdf se créeront en dehors d'Acces dans un premier temps.

Est-ce possible selon vous?

Auriez-vous des pistes à me donner?

Merci d'avance
12/07/2011, 18h38
LedZeppII

Bonjour,

J'essaierai avec Comment ouvrir un fichier HTML, Word, PDF ou autre en utilisant l'exécutable associé ?

A+

Merci beaucoup,

J'ai inséré un module dans mon formulaire que j'ai nommé "ouvrepdf"

Code:

1
2
3
4
5
Option Compare Database
 
Public 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

Puis sur double-clic de mon champ:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub monchamp_DblClick(Cancel As Integer)
    Dim tt As String
    Dim rr As String
    Dim ss As String
    Dim zz As String
 
    tt = "monchemin\"
    rr = [monchamp]
    ss = ".pdf"
    zz = tt + rr + ss
 
    ShellExecute Me.hWnd, vbNullString, zz, "", vbNullString, 1
 
End Sub

Bonne soirée ;)