Error on VBA Saving Excel File as PDF

[malja586]

I am getting a syntax error when I run the following macro
Sub testpdfgen()
'
' testpdfgen Macro
'
'
Sheets("pdf print out").Select
ChDir "R:\Warehouse\Inventory\Shipping-Receiving Review\2014\DONE Task 16 - Review PO Receipt Accuracy\Receiving POs Accurately\Weekly Reports"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"R:\Warehouse\Inventory\Shipping-Receiving Review\2014\DONE Task 16 - Review PO Receipt Accuracy\Receiving POs Accurately\Weekly Reports\" & Sheets("pdf print out").Range("C1").Value _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

End Sub

Not sure what is driving the error

 

[mole999]

if you changed
ChDir "R:\Warehouse\Inventory\Shipping-Receiving Review\2014\DONE Task 16 - Review PO Receipt Accuracy\Receiving POs Accurately\Weekly Reports"
to
ChDir "C:\"

does it work ?