If ThisWorkbook.ReadOnly = True Then
MsgBox "Read only"
Else
MsgBox " Read-Write"
End If


or...

If ThisWorkbook.ReadOnly = True Then
ThisWorkbook.Close
Else
MsgBox " read write"
End If




Duncan



Grace79 wrote:

Any help much appreciated!

When a spreadsheet is opened using a button containing a macro from
another spreadsheet, why doesn't it alert the user if someone is
already in the file? It just opens a 'read-only' copy. Is there any way
around this, with code or anything?

Thank you!


--
Grace79
------------------------------------------------------------------------
Grace79's Profile: http://www.excelforum.com/member.php...o&userid=36435
View this thread: http://www.excelforum.com/showthread...hreadid=562024