Bestand opslaan met een waarde uit een tabblad

[Lisette2016]

Hoe kan ik middels een vba een bestand opslaan, met een waarde die in "D2" van Tabblad "Draaitabel" staat.

'ActiveWorkbook.SaveAs Filename:= _"
'"C:\Historisch Overzicht"Historisch Overzicht" & ............. .xlsm", _

op de puntjes zou de waarde uit tab "draaitabel" van "D2" moeten komen te staan

 

[edmoor]

"C:\Historisch Overzicht\" & Sheets("draaitabel").Range("D2").Value & ".xlsm"