When I use a macro to open a file and the file is already in use it does not
give me the message of:
__________________________________________________ __

File in use:
_ _ _ _ _ is locked for editing

by _ _ _ _ _

Open ReadOnly or click Notifiy ...........

__________________________________________________ __


What it does is just open the file ReadOnly. How can I return this message?

Thank you,

Steven

if Thisworkbook.Readonly = true then
'Your message
else
'Your message
end if

"Steven" wrote:

When I use a macro to open a file and the file is already in use it does not
give me the message of:
__________________________________________________ __

File in use:
_ _ _ _ _ is locked for editing

by _ _ _ _ _

Open ReadOnly or click Notifiy ...........

__________________________________________________ __


What it does is just open the file ReadOnly. How can I return this message?

Thank you,

Steven

Joel,

If Thisworkbook.readonly = True Then
'I would like it to say the file is in use by ______
Endif

How do I do this?

Thank you,

Steven


"Joel" wrote:


if Thisworkbook.Readonly = true then
'Your message
else
'Your message
end if

"Steven" wrote:

When I use a macro to open a file and the file is already in use it does not
give me the message of:
__________________________________________________ __

File in use:
_ _ _ _ _ is locked for editing

by _ _ _ _ _

Open ReadOnly or click Notifiy ...........

__________________________________________________ __


What it does is just open the file ReadOnly. How can I return this message?

Thank you,

Steven

What about the Display Alerts being set to true so that it will display the
warning? I cannot remember the syntax for it, and I have personally never
used it, so I thought you could verify that, Joel. Thanks.
--
Please rate posts so we know when we have answered your questions. Thanks.


"Joel" wrote:


if Thisworkbook.Readonly = true then
'Your message
else
'Your message
end if

"Steven" wrote:

When I use a macro to open a file and the file is already in use it does not
give me the message of:
__________________________________________________ __

File in use:
_ _ _ _ _ is locked for editing

by _ _ _ _ _

Open ReadOnly or click Notifiy ...........

__________________________________________________ __


What it does is just open the file ReadOnly. How can I return this message?

Thank you,

Steven

Display Alerts = True does not fix it.

I have tried:

If ActiveWorkbook.ReadOnly = True Then
MsgBox "File in use by: " + ActiveWorkbook.WriteReservedBy
End If

but that returned my userid and not the person who had it open.

Does anyone have any ideas here?

Thank you,

Steven



"Orion Cochrane" wrote:

What about the Display Alerts being set to true so that it will display the
warning? I cannot remember the syntax for it, and I have personally never
used it, so I thought you could verify that, Joel. Thanks.
--
Please rate posts so we know when we have answered your questions. Thanks.


"Joel" wrote:


if Thisworkbook.Readonly = true then
'Your message
else
'Your message
end if

"Steven" wrote:

When I use a macro to open a file and the file is already in use it does not
give me the message of:
__________________________________________________ __

File in use:
_ _ _ _ _ is locked for editing

by _ _ _ _ _

Open ReadOnly or click Notifiy ...........

__________________________________________________ __


What it does is just open the file ReadOnly. How can I return this message?

Thank you,

Steven