You can't change the name of a workbook by changing the .Name property.

The .Name property is read-only. It is set to the filename when you save
the file. If you want to change the workbook name, you need to save the
file under that name, e.g..

ThisWorkbook.SaveAs FileName:="Defects " & Lists.Range("Q20").Value

This will save the file in the current directory. See SaveAs in VBA Help
for more.


In article ,
N E Body wrote:

Sorry Chip I think it must be Friday afternoon syndrome but I cannot get
my head round this one!

I tried changing it to ThisWorkbook.SaveAs and ActiveWorkbook.SaveAs
but still get various errors.