Something like
file = ActiveWorkbook.Path & "\" & "Invoice_" & Sheets("Sheet1").[A1] & "_" & Sheets("Sheet1").[A2] & ".pdf"
Something like
file = ActiveWorkbook.Path & "\" & "Invoice_" & Sheets("Sheet1").[A1] & "_" & Sheets("Sheet1").[A2] & ".pdf"
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'