Я выполняю набор фильтров на листе 2 моей рабочей книги, проблема в том, что я удаляю все данные, но когда я удаляю фильтр "= 0", он не удаляет все данные листа, но я думаю, что фильтр в порядке.
Dim wsToFilter As Worksheet
Dim wbToFilter As Workbook
Set wbToFilter = Workbooks("2. Detalle_Transacciones_pendientes_rechazadas_MDM_27Ene20.xlsx")
Set wsToFilter = wbToFilter.Worksheets("Rechazos_SSI_2019")
With wsToFilter
.Range("A1").AutoFilter 1, "<>BATCH"
.AutoFilter.Range.Offset(1).EntireRow.Delete
.AutoFilterMode = False
.Range("A1:K1").AutoFilter 2, "<>SSI"
.AutoFilter.Range.Offset(1).EntireRow.Delete
.AutoFilterMode = False
.Range("A1:K1").AutoFilter 6, "<>CARGA DE ARCHIVO A MDM, CONTRATOS"
.AutoFilter.Range.Offset(1).EntireRow.Delete
.AutoFilterMode = False
.Range("A1:K1").AutoFilter 11, "=0"
.AutoFilter.Range.Offset(1).EntireRow.Delete
.AutoFilterMode = False
End With
Что я делаю, так это то, что я копирую все данные из другой рабочей книги, вставляю их и затем применяю фильтр, я не знаю, удаляет ли он все из-за количество данных или это мой код неэффективен, потому что, если я уменьшу нагрузку на работу, макрос работает отлично.