Фильтр защищенной таблицы не разрешен

Question

Я нашел много записей о том, как разрешить фильтрацию на защищенных рабочих листах при сохранении файлов, однако моя проблема заключается в обратном:
Я хотел бы импортировать данные из защищенной таблицы с помощью VBA. Я не могу снять защиту листа и не могу сохранить другую версию. Я просто должен жить с защитой.
При использовании функции «Записать макрос» я получаю следующий код:

Sub Macro1()
    ActiveSheet.Range("$A$10:$JD$4364").AutoFilter Field:=101 'Unfilter one column
    ActiveSheet.Range("$A$10:$JD$4364").AutoFilter Field:=14, Operator:= _
        xlFilterValues, Criteria2:=Array(1, "3/1/2019") 'Filter for criteria
End Sub

Так что это работает "вручную". Однако, когда я встраиваю этот код в мой макрос импорта, я получаю следующее сообщение об ошибке:

сообщение об ошибке

Есть ли способ выполнить фильтр? Скрытие рядов также невозможно. Мне не нужно использовать автофильтр, подойдет обычный фильтр (если есть другой).

Большое спасибо!