Check if an Excel or Word file is "read only"????

[Robert Crandal]

Are there any VBA functions I can call from an Excel file that
will help me determine if a particular Excel 2007 or Word 2007
is currently in "read only" status? In other words, I need to
test if an Excel or Word file is opened or in use by another user??

I would like to know any or all methods to achieve this.

Thank you everyone!

Robert

 

[Harald Staff]

Hi Robert

Sub test()
MsgBox ActiveWorkbook.ReadOnly
MsgBox ActiveWorkbook.WriteReserved
MsgBox ActiveWorkbook.WriteReservedBy
End Sub

This needs the file to be open. If you want to see if a file is in use
before opening it, there is usually a similarly named temp file in the same
folder if someone else uses the file. Test opening and closing with a file
explorer window open.

Best wishes Harald

 

[Robert Crandal]

Do you know how to check the read only status on a
file that is NOT the ActiveWorkbook? For example,
I will be using a file named "mydata.xlsm". While using
this file, I want to run a macro to test whether a file named
"groupdata.xlsm" is open or being used by another user.

Also, if I want to see if a file is in use BEFORE opening it,
does that mean I need to check for the presence of a hidden
temp file in the same folder with a similar name? Is there a
reliable VBA function for this?

Thank you Harald!

 

[ManicMiner17]

On 07/08/2010 13:24, Robert Crandal wrote:

Might be worth looking at:
http://www.vbaexpress.com/kb/getarticle.php?kb_id=468

 

[Harald Staff]

MsgBox Workbooks("mydata.xlsm").ReadOnly
'and so on

and Yes, and No, not to my knowledge, you must write it.

Best wishes Harald

 

[Mike S]

MsgBox Workbooks("mydata.xlsm").ReadOnly
'and so on

and Yes, and No, not to my knowledge, you must write it.

Best wishes Harald

How about this approach?

http://support.microsoft.com/kb/153058