Elke Sheet printen als PDF met macro

Beste mensen,

Graag zou ik in het volgende bestand wat ik gemaakt heb nog wat wijzigingen aanbrengen maar ik weet niet hoe: Bekijk bijlage Overzicht inlaten Korhoenderhof test.xls

Het bestand werkt als volgt:
- Op het Sheet LEIDINGEN worden alle gegevens ingevuld.
- Het Sheet Inlaatstaat is een leeg voorbeeld wat ik gebruik om de inlaatstaten te genereren.
- Wanneer alle gegevens ingevuld zijn drukt met op de knop "inlaatstaten genereren". Hiermee worden de inlaatstaten aangemaakt. (Dit is dus een variabel aantal).
- Wanneer ik op de knop "Inlaatstaten Printen" druk worden ALLEEN de aangemaakte inlaatstaten afgedrukt op de standaard printer.
- Wanneer ik op de knop "Inlaatstaten Printen PDF" druk worden ALLEEN de aangemaakte inlaatstaten samen in een document als PDF afgedrukt.

Nu komt mijn vraag:
Ik zou graag een knop hebben die de aangemaakte inlaatstaten als PDF print maar dan elke inlaatstaat als los PDF document en die opgeslagen kan worden in een te kiezen map.
Ook zou het fijn zijn als de aangemaakte PDF-files de naam hebben van de Sheet.

Ik hoop dat jullie hiermee iets kunnen.

Bij voorbaat dank.

Met vriendelijke groet,

Mark Swinkels