*

Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: pdf-bestanden afprinten  (gelezen 2005 keer)

0 leden en 1 gast bekijken dit topic.

Offline Penny

  • Lid
  • *
  • Berichten: 41
  • I'm gonna live till I die.
pdf-bestanden afprinten
« Gepost op: 26 november 2007, 21:36:28 »
Beste Excellers,
Ik sta voor het volgende probleem:

Ik heb een werkblad waarin ik o.a. de bestandsnamen van verschillende certificaten (pdf-files) invul.

De bestandslocatie van deze "certificaten" is altijd
hetzelfde. En in mijn werkblad verwijs ik enkel naar 
bestaande bestanden.

Via een knopje en het followhyperlink commando kan ik de betreffende pdf-bestanden openen.

Nu was mijn vraag:
Hoe kan je ervoor zorgen dat via een knopje deze pdf-bestanden rechtstreeks worden afgeprint.
(Als je rechts klikt op een pdf-file, kan je 'print' kiezen. Maar hoe zeg je tegen excel dat dit zo moet gebeuren? Of is er een andere, betere, simpelere manier?)

Mvg
Penny
Gelogd

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: pdf-bestanden afprinten
« Reactie #1 Gepost op: 26 november 2007, 23:33:37 »
Hallo,

Dit heeft voor mij al zijn diensten bewezen.

Code: [Selecteer]
Option Explicit

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

Sub test()
Const SW_SHOWDEFAULT As Long = 10
Dim sFullPathToFile As String

sFullPathToFile = "C:\Program Files\Adobe\Acrobat 4.0\Help\NLD\Acrobat.pdf"

Call ShellExecute(0, "print", sFullPathToFile, 0&, 0&, SW_SHOWDEFAULT)

MsgBox "Het bestand """ & sFullPathToFile & """ wordt geprint", vbOKOnly, "PRINT"

End Subbeste groeten,
Erik
Gelogd

Offline Penny

  • Lid
  • *
  • Berichten: 41
  • I'm gonna live till I die.
Re: pdf-bestanden afprinten
« Reactie #2 Gepost op: 29 november 2007, 20:46:07 »
Hartelijk bedankt Erik. Deze code werkt perfect!  :) ;)
Gelogd

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: pdf-bestanden afprinten
« Reactie #3 Gepost op: 29 november 2007, 22:32:22 »
Da's fijn om te horen. Zo weet ik dat het ook op andere systemen werkt.
:)
Gelogd
Pagina's: [1]   Omhoog
 


www.combell.com