print as PDF and save as

[Trevor3007]

I have this code:-

Sub pdfInvoice()
'
' pdfInvoice Macro
'


'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, PrintToFile:=True, Collate _
:=True, IgnorePrintAreas:=False
End Sub

But I want it to save to a specific location & as the 'saved file' name will change upon each print, can it use a a cell ref (ie save to c:\data\cell d2+e2+f1+g1.pdf

MTIA
KR Trevor3007

 

[Tom.Jones]

Maybe

c:\data\[d2]&[e2]&[f1]&[g1]&".pdf "

 

[Yongle]

@TomJones
"c:\data\" & [d2]& [e2]& [f1]& [g1] & ".pdf "

 

[Trevor3007]

Maybe

c:\data\[d2]&[e2]&[f1]&[g1]&".pdf "

thank you Tom.Jones ,

where with in the code do i place

c:\data\[d2]&[e2]&[f1]&[g1]&".pdf " ?

KR
Trevor3007