Ошибка: определяется приложением или объектом при попытке скрыть строку

Question

Я пытаюсь скрыть строки в таблице на основе определенных критериев. У меня есть код, работающий для поиска ячеек, и теперь я пытаюсь скрыть другие строки, но когда я делаю, я получаю следующую ошибку:

"Ошибка времени выполнения: '1004': Application- определенная или определенная объектом ошибка "

Вот мой код:

'Intiansiate objects and setup variables
Dim tbl As ListObject
Dim c As Range
Dim colStartDate As Range
Dim FoundDate As Date
'Set object/variable values
Set tbl = ActiveWorkbook.Worksheets(1).ListObjects("Table1")

With tbl
    'Search "Start Date" (Col2), top to bottom, searching for the first cell with a color index of 35 and the "End Date" (Col3) which has an index color of anything other than 35
    Set colStartDate = .ListColumns("start date").DataBodyRange
    For Each c In colStartDate.Cells
        If c.Interior.ColorIndex = 35 And c.Offset(0, 1).Interior.ColorIndex <> 35 Then
            FoundDate = c.Value
            Exit For
        End If
    Next c

    For Each c In colStartDate.Cells
        If Not c.Hidden = True Then
            If Not c.Value >= FoundDate Then
                c.Hidden = True
            End If
        End If
    Next c
End With

MsgBox FoundDate

Answer 1

По документам Range.Hidden:

Указанный диапазон должен охватывать весь столбец или строку.

Использовать c.EntireRow.Hidden = True.