Excel 97 - xlNoSelection - problem

[Michael Beckinsale]

Hi all,

I have set the Worksheet properties to xlNoSelection (for certain sheets) in
a Excel 97 workbook. However if l save the workbook close it, then re-open
it the subject sheets have reverted to xlNoRestrictions !

The original workbook, written for XL2003, works fine.

Anybody know what causes this and if there is a solution / workaround.

TIA

Regards

Michael Beckinsale

 

[keepITcool]

Workaround:
(code in thisworkbook module..)

Private Sub Workbook_Open()
Dim wks As Worksheet
If Val(Application.Version) = 8 Then
For Each wks In Me.Worksheets
wks.EnableSelection = xlNoSelection
Next
End If
End Sub

 

[michael.beckinsale]

keepITcool,

Thanks for the reply & solution which of course works fine. I have had
to modify it slightly so it only applies to the specific sheets l need
restricted.

Do you know if this is a bug in Excel 97 ?

Can you confirm that Excel 97=8, Excel 2000=9, Excel 2003=10 please ?
Thinking about it what is Excel XP ?

 

[keepITcool]

dont know about the other versions.
remove the version check in the routine and you should be fine.

--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


(e-mail address removed) wrote in

 

[michael.beckinsale]

keepITcool,

Found the list of version numbers etc on John Walkenbachs' site if your
interested.

http://j-walk.com/ss/excel/index.htm

 

[Tom Ogilvy]

When set by code (only method is that shown by KeepItCool) in any version
(xl97 and later), it is not persistant

When set manually in xl2002 and later it is persistant.