ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   File in use (https://www.excelbanter.com/excel-programming/416425-file-use.html)

steven

File in use
 
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

File in use
 

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


steven

File in use
 
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


Orion Cochrane

File in use
 
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


steven

File in use
 
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



All times are GMT +1. The time now is 12:25 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com