Op te slaan PDF in andere (sub)map plaatsen

[Zeeuwjer]

Hallo,
Ik heb bijgaand stukje code (geknipt uit een langere code) waarmee ik een excel blad in PDF omzet en opsla. Het opgeslagen PDF document komt in dezelfde map terecht als de locatie van het excel document, graag wil ik het PDF document in een andere submap opslaan. Hoe kan ik de code hiermee aanpassen?
Het excel bestand staat in submap 01, het PDF bestand wil ik graag opslaan in submap 05-01.

Alvast bedankt voor de hulp.
Jeroen

 

[edmoor]

En wat staat er precies in K6 en K7?

 

[Zeeuwjer]

K6 is de bestandsnaam, in dit geval een samengevoegd tekstveld uit verschillende cellen
K7 is de bestandslocatie, via formule =LINKS(CEL("bestandsnaam");VIND.SPEC("[";CEL("Bestandsnaam");1)-1)

 

[edmoor]

Die bestandslocatie heb je niet nodig.
Die is in VBA voorhanden via ThisWorkbook.Path en kan je dan uitbreiden:

ThisWorkbook.Path & "\05-01\"

 

[Zeeuwjer]

Hoi Ed,

Ik heb even lopen stoeien met je reactie maar ik krijg het niet voor elkaar.

Het excel bestand staat in de map 01 projectinfo - planning, het aangemaakte PDF bestand wil ik graag opslaan in de map 05 onderaannemers - leveranciers, submap 01 verzonden opdrachten.
Het lukt mij niet om die controle of het bestand al op deze locatie aanwezig is en dan vervolgens hierop slaan.
Heb jij nog een suggestie?

bvd Jeroen