Hi P45CAL

The seems to be an error on the filename when saving, I get an error in yellow

ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings\" & strUser & "\Desktop\Forecast\" & part1 & " " & part2 & " " & part3 & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
ActiveWindow.Close

I changed the file name to exclude " & part1 & " " & part2 & " " & part3 & ".xlsx", and just save to desktop inthe folder, and it worked fine



Any ideas why this is not working - saving filename as cell A2 & C2 & L2

Pecoflyer - unclear what I have not done when entering the thread ?

Regards

Brian

As I mentioned you did not wrap your code with code tags

__________________
Using O365 v2503 - Did you know you can thank someone who helped you? Click on the tiny scale in the right upper hand corner of your helper's post

Hi p45cal

Thank you - works perfectly. I did have an illegal characters in the filename

Incidentally, if I wanted to save as a PDF File, instead of workbook what do I have t amend the format to

FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

Regards

Brian