Ошибка при использовании SpecialCells AutoFilter для получения видимых ячеек в VBA

Моя главная цель - скопировать видимые ячейки автофильтра, а затем скопировать размеры видимых ячеек на новый лист. Я использую этот код:

Sheets(1).AutoFilterMode = False
Sheets(1).Range("A1:A1").AutoFilter Field:=columnaNumeroIntervalo, criteria1:=CDec(paramCantidadCriterio)
Sheets(1).Range("A1:A1").AutoFilter Field:=columnaNumeroIntervaloUnidades, Criteria1:=paramUnidadesCriterio

MsgBox AutoFilter.Range.SpecialCells(xlCellTypeVisible)(2, 11).Value

В последней строке я хочу проверить значение ячейки. Если я используюCells(2,11) вместоSpecialCells Я вижу, что ячейки имеют все ячейки листа, видимые и не видимые. Поэтому я хочу использоватьSpecialCells.

Если я использую специальные ячейки, я получаю следующую ошибку:

error '-2147417848 (80010108) in runtime. Automatization error.

В то время как тип выполнения, кажется, входит в цикл, и, наконец, дает эту ошибку. Возможно, SpecialCells модифицируют автофильтр, а затем в каждой модификации снова запускают автофильтр?