It looks like you have a misplaced quote in there:
"FPath & " \ " & FName & .pdf", Quality:=xlQualityStandard, _
Try this
FPath & " \ " & FName & ".pdf", Quality:=xlQualityStandard, _