автофильтр в Excel2007

[Lirin]

есть лист с данными в экселе, на котором ставлю автофильтр по пустым полям в столбцах 3 и 5:

Код: Выделить всё

With ActiveSheet
            .AutoFilterMode = False
                With .Range(Cells(1, 1), Cells(MaxR, MaxC))
                     .AutoFilter
                     .AutoFilter Field:=3, Criteria1:="="
                     .AutoFilter Field:=5, Criteria1:="="
                End With
    End With

при попытке посчитать количество строк, выбранных автофильтром

Код: Выделить всё

MsgBox (ActiveSheet.AutoFilter.Range.Rows.SpecialCells(xlCellTypeVisible).Count)

получаю число 36, а на самом деле автофильтр ничего не выбрал, т.к. изначально нет строк попадающих под это условие. так откуда получается 36 строк??? и соответственно при попытке выделить диапазон строк

Код: Выделить всё

Set myFiltered = ActiveSheet.AutoFilter.Range.Offset(1, 0).Resize(ActiveSheet.AutoFilter.Range.Rows.Count - 1, _
       ActiveSheet.AutoFilter.Range.Columns.Count).SpecialCells(xlCellTypeVisible)

получаю ошибку "не найдено ни одной ячейки, удовлетворяющей условию"
подскажите, плз, как определить правильно наличие/отсутствие результата выборки автофильтром

[@Nik]

Надо считать по одному столбцу, а не по всей таблице:
MsgBox (ActiveSheet.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Count-1)

А у на офисе ХР формула, что вы привели для выделения диапазона, работает