Quote Originally Posted by ddbroadhead92 View Post
As soon as I run it, it comes up with the following error

Run-time error
'-2147024773 (8007007b)':
document not saved
Try stepping through the code, using F8. Looks like it's failing on this line:
Sheets("Template Re-design").ExportAsFixedFormat _
                Type:=xlTypePDF, _
                Filename:="M:\2016\Collections AR\RESTORED\Invoices\" & Cells(1, 1).Value & ".pdf", _
                Quality:=xlQualityStandard, _
                IncludeDocProperties:=True, _
                IgnorePrintAreas:=False, _
                OpenAfterPublish:=False
Which was copied from your original macro...