Macro que filtra en base a un filtro variable pero no deja eliminar filas

Hola, tengo un problema porque después más adelante en mi código me marca error en la fila que puse en negrita porque dice que no se puede insertar o eliminar una columnaque tenga activado el comando autofiltro

Range("A1:B1").AutoFilter Field:=2, Criteria1:="<>" & catalogo
    Rows("2:2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Delete Shift:=xlUp
    Selection.AutoFilter Field:=2

Espero haya una solución a esto

De antemano gracias

Saludos