![]() |
how can identify locked/hidden cells at a glance
|
For hidden cells, I don't think you can do anything besides look and not see
them <g. But for locked cells, you can use format|conditional formatting (if you're not using it for something else). With the range you're concerned about selected, you can use a formula like: =CELL("protect",A1) (Change A1 to the activecell) Merlin wrote: -- Dave Peterson |
When I look for hidden rows/columns, I look at the worksheet row and column
headers looking for skipped numbers/letters. If the rows have been hidden by a filter, you can see that the row numbering (in the row headers) in that filtered range now has a blue font. You could run a macro that counts the visible/hidden rows/columns: Option Explicit Sub testme() Dim wks As Worksheet Dim visCols As Long Dim visRows As Long Set wks = ActiveSheet With wks visCols = 0 visRows = 0 On Error Resume Next visCols = Intersect(.Cells.SpecialCells(xlCellTypeVisible) _ .EntireColumn, .Rows(1)).Cells.Count visRows = Intersect(.Cells.SpecialCells(xlCellTypeVisible) _ .EntireRow, .Columns(1)).Cells.Count On Error GoTo 0 If visCols < .Columns.Count _ Or visRows < .Rows.Count Then MsgBox "Visible Rows: " & visRows & vbLf & _ "Hidden Rows: " & .Rows.Count - visRows & vbLf & vbLf & _ "Visible Col: " & visCols & vbLf & _ "Hidden Cols: " & .Columns.Count - visCols Else MsgBox "No hidden rows/columns" End If End With End Sub If you're new to macros, you may want to read David McRitchie's intro at: http://www.mvps.org/dmcritchie/excel/getstarted.htm Dave Peterson wrote: For hidden cells, I don't think you can do anything besides look and not see them <g. But for locked cells, you can use format|conditional formatting (if you're not using it for something else). With the range you're concerned about selected, you can use a formula like: =CELL("protect",A1) (Change A1 to the activecell) Merlin wrote: -- Dave Peterson -- Dave Peterson |
All times are GMT +1. The time now is 12:39 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com