[VBA-E et Pdf] Inserer par code un fichier pdf2 de plusieurs pages
Bonjour à tous,
Je me permets de vous soliciter car j'ai un petit soucis dont je ne vois aucunement la solution.
J'ai fait un morceaude code pour inserer automatiquement un fichier pdf en utilisant un objet oleobject.
Seulement ce document faisant deux pages je n'arrive pas a afficher plusieurs pages. il me met invariablement la page 1...
Comment pourrai je faire? (autrement qu'en découpant le fichier pdf original en pdf page par page)
voici le code que j'utilise (il est volontairement mince)
Code:
1
2
3
4
5
6
7
8
9
10
11
|
Sub tt()
Dim truc As OLEObject
Dim stchemin As String
Dim stfichier As String
stchemin = "C:\"
stfichier = "mon.pdf"
Set truc = OLEObjects.Add(, stchemin & stfichier, , , , , False)
End Sub |
