Save as PDF not working

I’m trying to save this page as a PDF, i’m not really into coding much so I can’t understand why it’s working. Could someone help me please? (i changed location to me to hide my name but I believe the location is correct error 1004

Sub SaveAsPDF ( ) InvoiceNo = Range ("C3") CustomerName = Range ("B10") path "C: \Users\Me\ Documents\ Parking Invoices\" fname "Invoice" & " & InvoiceNo & & CustomerName MsgBox "Saved as PDF" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDE. End sub SaveAsPDF ignoreprintareas:-False, Filename:=path & fname