Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
Bob Bob is offline
external usenet poster
 
Posts: 972
Default 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
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,058
Default 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

  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 1
Default 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

  #4   Report Post  
Posted to microsoft.public.excel.misc
Bob Bob is offline
external usenet poster
 
Posts: 972
Default 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

  #5   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,058
Default 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

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Finding cells that contain an apostrophe Bob Excel Discussion (Misc queries) 7 December 18th 06 08:35 PM
Finding blank cells scorpiorc Excel Discussion (Misc queries) 10 December 7th 06 06:27 PM
Calculating only non-empty cells... Jay Excel Worksheet Functions 9 September 22nd 06 03:20 AM
Finding Cells C. Brown Excel Worksheet Functions 3 March 29th 06 09:37 AM
Finding unnamed cells in a range 70Bob Excel Discussion (Misc queries) 3 June 21st 05 01:50 PM


All times are GMT +1. The time now is 06:03 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"