Select hidden cells
 

I know you can select visible cells with:

Range.SpecialCells(Excel.XlCellType.xlCellTypeVisi ble).Select

Is there a way to select the opposite of that? I need to set the hidden
cells values to null.

Thanks.

Select hidden cells
 

Try:

Sub hidden_stuff()
Dim rHidden As Range
Set rHidden = Nothing
For Each r In Selection
If r.FormulaHidden = True Then
If rHidden Is Nothing Then
Set rHidden = r
Else
Set rHidden = Union(rHidden, r)
End If
End If
Next
If rHidden Is Nothing Then
Else
MsgBox (rHidden.Address)
End If
End Sub

--
Gary's Student
gsnu200703


"ALV" wrote:

I know you can select visible cells with:

Range.SpecialCells(Excel.XlCellType.xlCellTypeVisi ble).Select

Is there a way to select the opposite of that? I need to set the hidden
cells values to null.

Thanks.

Select hidden cells
 

Thanks Gary.

When I run this, cells in hidden and filtered rows don't have FormulaHidden
set to True, so nothing is selected.

In my current code I run through the range row-by-row and check if EntireRow
is hidden, but this kills performance. On data sets over a hundred thousand
rows it can take a half hour.


"Gary''s Student" wrote:

Try:

Sub hidden_stuff()
Dim rHidden As Range
Set rHidden = Nothing
For Each r In Selection
If r.FormulaHidden = True Then
If rHidden Is Nothing Then
Set rHidden = r
Else
Set rHidden = Union(rHidden, r)
End If
End If
Next
If rHidden Is Nothing Then
Else
MsgBox (rHidden.Address)
End If
End Sub

--
Gary's Student
gsnu200703


"ALV" wrote:

I know you can select visible cells with:

Range.SpecialCells(Excel.XlCellType.xlCellTypeVisi ble).Select

Is there a way to select the opposite of that? I need to set the hidden
cells values to null.

Thanks.