Finding all cells that are locked/hidden
 

Similar to Excel's "Go To Special" feature (Edit | Go To... | Special), I
need a quick and easy way to find and highlight all cells whose protection
has been set to locked and/or hidden.

Is there a way I can do that in Excel, or is there a third-party add-in that
can help?

Thanks,
Bob

Finding all cells that are locked/hidden
 

Run this sub:

Sub gsnu()
Dim rr As Range

For Each r In ActiveSheet.UsedRange
If r.Locked Or r.FormulaHidden Then
If rr Is Nothing Then
Set rr = r
Else
Set rr = Union(rr, r)
End If
End If
Next

If rr Is Nothing Then
Else
rr.Select
End If
End Sub

--
Gary's Student


"Bob" wrote:

Similar to Excel's "Go To Special" feature (Edit | Go To... | Special), I
need a quick and easy way to find and highlight all cells whose protection
has been set to locked and/or hidden.

Is there a way I can do that in Excel, or is there a third-party add-in that
can help?

Thanks,
Bob

Finding all cells that are locked/hidden
 

"Bob" wrote:

Similar to Excel's "Go To Special" feature (Edit | Go To... | Special), I
need a quick and easy way to find and highlight all cells whose protection
has been set to locked and/or hidden.

Is there a way I can do that in Excel, or is there a third-party add-in that
can help?

Thanks,
Bob

Finding all cells that are locked/hidden
 

As always, thanks for your help. I sincerely appreciate it.
Have a very Happy & Healthy New Year!
Bob


"Gary''s Student" wrote:

Run this sub:

Sub gsnu()
Dim rr As Range

For Each r In ActiveSheet.UsedRange
If r.Locked Or r.FormulaHidden Then
If rr Is Nothing Then
Set rr = r
Else
Set rr = Union(rr, r)
End If
End If
Next

If rr Is Nothing Then
Else
rr.Select
End If
End Sub

--
Gary's Student


"Bob" wrote:

Similar to Excel's "Go To Special" feature (Edit | Go To... | Special), I
need a quick and easy way to find and highlight all cells whose protection
has been set to locked and/or hidden.

Is there a way I can do that in Excel, or is there a third-party add-in that
can help?

Thanks,
Bob

Finding all cells that are locked/hidden
 

You are very welcome! Stay safe this weekend.
--
Gary's Student


"Bob" wrote:

As always, thanks for your help. I sincerely appreciate it.
Have a very Happy & Healthy New Year!
Bob


"Gary''s Student" wrote:

Run this sub:

Sub gsnu()
Dim rr As Range

For Each r In ActiveSheet.UsedRange
If r.Locked Or r.FormulaHidden Then
If rr Is Nothing Then
Set rr = r
Else
Set rr = Union(rr, r)
End If
End If
Next

If rr Is Nothing Then
Else
rr.Select
End If
End Sub

--
Gary's Student


"Bob" wrote:

Similar to Excel's "Go To Special" feature (Edit | Go To... | Special), I
need a quick and easy way to find and highlight all cells whose protection
has been set to locked and/or hidden.

Is there a way I can do that in Excel, or is there a third-party add-in that
can help?

Thanks,
Bob