Change cell protection based on cell value macro

Seanzies

Board Regular
Joined
Nov 19, 2005
Messages
212
I have a one time use macro that is needed in order to change a bunch off cells protection to either locked or unlocked.

I want it to only change the cell protection if the cell value is equal to 1. I have part of the code below but don't know the rest of ithe criteria needed.

Code Example:
Columns("D:AA").Select
Selection.Locked = False
Selection.FormulaHidden = False
End Sub
 

Excel Facts

Why are there 1,048,576 rows in Excel?
The Excel team increased the size of the grid in 2007. There are 2^20 rows and 2^14 columns for a total of 17 billion cells.

BrianB

Well-known Member
Joined
Feb 17, 2003
Messages
8,127
This checks all cells in the selection. You may like to delete the first line and select manually to reduce the run time.

Code:
    Columns("D:AA").Select
    For Each c In Selection.Cells
        If c.Value = 1 Then
            c.Locked = False
            c.FormulaHidden = False
        End If
    Next
 
Master Excel Bundle

Excel contains over 450 functions, with more added every year. That’s a huge number, so where should you start? Right here with this bundle.

Forum statistics

Threads
1,163,999
Messages
5,834,813
Members
430,323
Latest member
Regash

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top