Vraagje,

1.Ik wil graag een userform maken met een ComboBox o.i.d die gevuld wordt met pdf-files uit een locatie op de harde schijf.
    Deze folder moet worden opgezocht door gebruik van een variabele cel  (in mijn geval (AH5) ).
    Dus daarin staat zoiets als ...... D:\Testmap\Pdf_Files\.......
2.Vervolgens dat je dan een pdf file hieruit kan selecteren en  dat je die dan kan printen.
   (wellicht met extra een selectbox die aangeeft "Preview First")

Helaas heb ik niks kunnen vinden en ben nog niet zover dat ik deze zelf kan maken.
Iemand die een tip heeft waar ik zoiets dergelijks kan vinden of wellicht zelf een scriptje heeft?

Ik hoor graag van jullie, gr Cor

Beste Emields,

Dat pad wordt straks netjes neergezet.
Dus volgens mij komt dat wel goed gezien dat ik dat nu ook gebruik om een pdf op te slaan.
Vandaar dat ik aanneem dat dit ook werkt om een folder te openen.
Maar... ik kan het mis hebben natuurlijk.
Ik heb er gewoon te weinig verstand van om er goed over te kunnen oordelen.
Vandaar mijn vraag voor een userform vba script die dit allemaal zou kunnen.

Gr Cor

Beste Philiep,

Weer helemaal top.
En ja, beetje wel haha.
Marruh, het werkt wel alleen krijg ik dit te zien. (zie bijlage)
Het liefst zou ik gewoon de geselecteerde PDF erin zien en een knop [PRINTEN]
En gooit hij mij af en toe uit excel en start deze weer op. Hmmmm.
Mocht je toevallig tijd en zin hebben ?

Ik hoor graag van je, groet Cor

Hoi Philiep,

Net aangezet en zelfs opnieuw opgestart.
Maar hij wil gewoon de file downloaden blijkbaar.
Dus..... helaas bij mij werkt het (nog) niet.

Ik hoor graag van je of je het probleem weet.
Mzzl Cor

Hoi Phillip,

Ik stuur je wel het origineel op.
Kan je zelf even kijken.
Ik heb overigens wel een leeg blad gemaakt genaamd [PrintPdf].
En via de print knop daar naar verwezen.
Want alleen de code [viewPDFForm.Show] geeft namelijk ook een fout.
Hopelijk kom jij eruit.

Gr Cor

Bij mij werkt uw bestand .
Ik heb een kleine aanpassing gemaakt in de userform code.
MyFolder = Sheets("PLF001").Range("$AH$4").Value
Ik verwijs naar blad PLF001 waar in AH4 de locatie staat.

IK gebruik ook versie 2019, daar zal het niet aan liggen.