2003 to 2007 , ActiveWorkbook.ReadOnly

E

EXCELMACROS

hi, I have the below code that used to work fine on 2003, now on 2007 and I'm
getting false all the time regarless if the file is read-only or not, does
anyone knows how to translate to 2007 the below?


If ActiveWorkbook.ReadOnly = True Then
MsgBox ("You are in Read-Only, please re-open...")
ActiveWindow.Close
Else
....

Thank you in advance
 
Top