Bestanden opslaan met 'dynamische bestandsnaam' en map maken

[miriam85]

Hallo,
Ik heb een Excel 2007 bestand met verschillende tabbladen. Elke keer dat ik een wijziging doorvoer pas ik het versienummer aan en wil ik de verschillende tabbladen als pdf opslaan.
Nu wil ik graag een macro die het volgende doet:
- een map aanmaken in een vastgestelde directory met het versienummer (dit staat in cel B2 op het tabblad Versions)
- elk afzonderlijk tabblad opslaan als pdf, in de bovenstaande map, met de volgende bestandsnaam: versienummer - Naam Tabblad. Het versienummer staat dus in een cel.
- Wanneer de map al bestaat moet deze natuurlijk niet opnieuw worden aangemaakt en wanneer het bestand al bestaat moet het overschreven worden.

Ik hoop dat jullie me kunnen helpen!

ps. ik wist niet zeker of het visual basic of visual basic for applications betrof, maar volgens mij is het algemener dus post ik het hier.

 

[youri81]

Map aanmaken kan zo:

Sheets("Versions").Select
Range("B2").Select
On Error Resume Next
MkDir "c:\" & ActiveCell.Text

Maar hoe sla je op als PDF? Die actie kun je in een loop plaatsten. Iets met ActiveSheet.Next.Select

 

[miriam85]

gelukt met een macro