Detect if workbook is readonly

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi

I was wondering if there were a simple way to detect if the workbook, when
opened, was opened in read-only mode? The reason for this is that I have
code in place to automatically time-out the book after 5 minutes of
inactivity, but I wouldn't want this to happen if it were opened as
read-only. I would just need to suppress the code in the workbook_open
handler (or insert an if statement to determine if it should be run).

Any help gratefuly received!

Duncan
 
You can check with something like:

If ThisWorkbook.ReadOnly = True Then
or
If Activeworkbook.ReadOnly = True Then

Depending on where the code is.
 
Duncan,

This macro could go in the workbook open event to determione if it is read
only:-

Sub stantiate()
If ActiveWorkbook.ReadOnly Then
MsgBox "Read-only" '<Don't time out
Else
MsgBox "Read & Write" '<Timeout
End If
End Sub

Mike
 
OK, Does anyone know how to make this work in Excel 2007 when opening files from SharePoint? I get false in response to either (active or this) regardless of the status of the file.

This worked just fine when opening from the same library with Excel 2003, so I could error trap to save the file and clear the read-only status. Excel 2007 doesn't trigger the trap!!



Dunca wrote:

RE: Detect if workbook is readonly
13-Jul-07

Thanks guys - i knew it'd be something simple!

Cheers

Duncan

:

Previous Posts In This Thread:

Detect if workbook is readonly
Hi

I was wondering if there were a simple way to detect if the workbook, when
opened, was opened in read-only mode? The reason for this is that I have
code in place to automatically time-out the book after 5 minutes of
inactivity, but I wouldn't want this to happen if it were opened as
read-only. I would just need to suppress the code in the workbook_open
handler (or insert an if statement to determine if it should be run).

Any help gratefuly received!

Duncan

Re: Detect if workbook is readonly
You can check with something like:

If ThisWorkbook.ReadOnly = True Then
or
If Activeworkbook.ReadOnly = True Then

Depending on where the code is.

Duncan wrote:

--

Dave Peterson

Duncan,This macro could go in the workbook open event to determione if it is
Duncan,

This macro could go in the workbook open event to determione if it is read
only:-

Sub stantiate()
If ActiveWorkbook.ReadOnly Then
MsgBox "Read-only" '<Don't time out
Else
MsgBox "Read & Write" '<Timeout
End If
End Sub

Mike

:

RE: Detect if workbook is readonly
Thanks guys - i knew it'd be something simple!

Cheers

Duncan

:


Submitted via EggHeadCafe - Software Developer Portal of Choice
Javascript Martin Fractals with IE and VML
http://www.eggheadcafe.com/tutorial...4-4618f1fcc9fd/javascript--martin-fracta.aspx
 
OK, Does anyone know how to make this work in Excel 2007
when opening files from SharePoint? I get false in
response to either (active or this) regardless of the
status of the file.

This worked just fine when opening from the same library
with Excel 2003, so I could error trap to save the file
and clear the read-only status. Excel 2007 doesn't
trigger the trap!!




Dunca wrote:

RE: Detect if workbook is readonly
13-Jul-07

Thanks guys - i knew it'd be something simple

Cheer

Dunca

:

Previous Posts In This Thread:

Detect if workbook is readonly
H

I was wondering if there were a simple way to detect if the workbook, when
opened, was opened in read-only mode? The reason for this is that I have
code in place to automatically time-out the book after 5 minutes of
inactivity, but I wouldn't want this to happen if it were opened as
read-only. I would just need to suppress the code in the workbook_open
handler (or insert an if statement to determine if it should be run)

Any help gratefuly received

Duncan

Re: Detect if workbook is readonly
You can check with something like

If ThisWorkbook.ReadOnly = True The
o
If Activeworkbook.ReadOnly = True The

Depending on where the code is

Duncan wrote

-

Dave Peterson

Duncan,This macro could go in the workbook open event to determione if it is
Duncan

This macro could go in the workbook open event to determione if it is read
only:

Sub stantiate(
If ActiveWorkbook.ReadOnly The
MsgBox "Read-only" '<Don't time ou
Els
MsgBox "Read & Write" '<Timeou
End I
End Su

Mik

:

RE: Detect if workbook is readonly
Thanks guys - i knew it'd be something simple

Cheer

Dunca

:

This doesn't work in 2007!
OK, Does anyone know how to make this work in Excel 2007 when opening files from SharePoint? I get false in response to either (active or this) regardless of the status of the file.

This worked just fine when opening from the same library with Excel 2003, so I could error trap to save the file and clear the read-only status. Excel 2007 doesn't trigger the trap!!


Submitted via EggHeadCafe - Software Developer Portal of Choice
Document Compatibility in Internet Explorer 8
http://www.eggheadcafe.com/tutorial...b-a7cd299b73c9/document-compatibility-in.aspx
 
Back
Top