Hello everyone

I am trying to change the name of the open workbook to include th
textvalue of a cell. I am receiving a compile error when I add thi
line to my Before close code

ThisWorkbook.Name = "Defects " & Lists.Range("Q20").Value & ".xls"

The Compile Error states - Cant assign to read-only property.

.Name is highlighted

Where am I going wrong?

Kenny

Excel 9

--
N E Bod
-----------------------------------------------------------------------
N E Body's Profile: http://www.excelforum.com/member.php...fo&userid=1126
View this thread: http://www.excelforum.com/showthread.php?threadid=32059