Celwaarde als subdirectorie benoemen in opslaan.

[1965Peter]

Hallo,

Ik wil een bestand opslaan met een macro. In Cel A1 staat "2016". In Cel B1 staat "01-2016" Deze waarde wil ik gebruiken voor het opslaan in de goede map.

ActiveWorkbook.SaveAs Filename:="H:\2016\01-2016\Factuur Januari.xlsm"

Hoe kan waarde "2016" bij het opslaan vervangen door de waarde uit Cel A1
en waarde "01-2016" vervangen door waarde uit cel B1

Alvast bedankt

 

[edmoor]

ActiveWorkbook.SaveAs Filename:="H:\" & Range("A1").Value & "\" & Format(Range("B1"), "MM-YYYY") & "\Factuur Januari.xlsm"

Er vanuit gaande dat B1 een echte datum bevat en geen tekst.

 

[Peter2016]

Weer bedankt Edmoor, ik had al zoiets geprobeerd, maar miste het "&"teken voor de \. Zal nu wel lukken denk ik.