ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   worksheet protection excel 2000 vrs 2003 (https://www.excelbanter.com/excel-programming/330911-worksheet-protection-excel-2000-vrs-2003-a.html)

wtpcomplab

worksheet protection excel 2000 vrs 2003
 
I have a worksheet with the code below running on excel 2003.
The worksheet is protected with "select unlocked cells" and "formatt cells"
enabled.
When moved to excel 2000 the option for "formatt cells" fails.
Unsure how to correct this in excel 2000.
Any help would be a boon.

Dan


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
..FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
..FormatConditions(1).Interior.ColorIndex = 6
End With

End Sub


Alan

worksheet protection excel 2000 vrs 2003
 
Not completely sure, but I think that the option to select locked and
unlocked cells was not available on XL2000 as were 'allow AutoFilter' etc
and 'allow formatting cells'.
If so then that is the reason the code fails. I'm sure someone will confirm
or overturn this theory,
Regards,
Alan.
"wtpcomplab" wrote in message
...
I have a worksheet with the code below running on excel 2003.
The worksheet is protected with "select unlocked cells" and "formatt
cells"
enabled.
When moved to excel 2000 the option for "formatt cells" fails.
Unsure how to correct this in excel 2000.
Any help would be a boon.

Dan


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 6
End With

End Sub




Harald Staff

worksheet protection excel 2000 vrs 2003
 
Hi Dan

Confirming Alan's post, Excel 2000 can not do that. Unless the user defines
the protection password, your code could unprotect - format - reprotect the
sheet.

You should develop these things in the eraliest version to be used,
otherwise you are coding blindfolded.

HTH. Best wishes Harald

"wtpcomplab" skrev i melding
...
I have a worksheet with the code below running on excel 2003.
The worksheet is protected with "select unlocked cells" and "formatt

cells"
enabled.
When moved to excel 2000 the option for "formatt cells" fails.
Unsure how to correct this in excel 2000.
Any help would be a boon.

Dan


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 6
End With

End Sub




wtpcomplab

worksheet protection excel 2000 vrs 2003
 
Thanks Alan
A guy can Hope.
But it is "Gates" I did not expect it to be easy.

Dan

"Alan" wrote:

Not completely sure, but I think that the option to select locked and
unlocked cells was not available on XL2000 as were 'allow AutoFilter' etc
and 'allow formatting cells'.
If so then that is the reason the code fails. I'm sure someone will confirm
or overturn this theory,
Regards,
Alan.
"wtpcomplab" wrote in message
...
I have a worksheet with the code below running on excel 2003.
The worksheet is protected with "select unlocked cells" and "formatt
cells"
enabled.
When moved to excel 2000 the option for "formatt cells" fails.
Unsure how to correct this in excel 2000.
Any help would be a boon.

Dan


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 6
End With

End Sub





wtpcomplab

worksheet protection excel 2000 vrs 2003
 
When I was given this project I was told this was the oldest version I needed
to code for.
But Hey.
Thanks anyway.

Dan

"Harald Staff" wrote:

Hi Dan

Confirming Alan's post, Excel 2000 can not do that. Unless the user defines
the protection password, your code could unprotect - format - reprotect the
sheet.

You should develop these things in the eraliest version to be used,
otherwise you are coding blindfolded.

HTH. Best wishes Harald

"wtpcomplab" skrev i melding
...
I have a worksheet with the code below running on excel 2003.
The worksheet is protected with "select unlocked cells" and "formatt

cells"
enabled.
When moved to excel 2000 the option for "formatt cells" fails.
Unsure how to correct this in excel 2000.
Any help would be a boon.

Dan


'----------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'----------------------------------------------------------------
Cells.FormatConditions.Delete
With Target
.FormatConditions.Add Type:=xlExpression, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = 6
End With

End Sub






All times are GMT +1. The time now is 05:43 AM.

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