带2个长variables的应用程序定义的或对象定义的错误

我对使用VBAmacros很新，我似乎无法解决这个问题。

我正在尝试创build一个macros来执行高级filter。 我想要macros筛选列A：E对列N中的数字列表中的结果。我希望macros能够通过查找E列中最后占用的行，我已分配给列表范围variablesBlankRowinE。 然后，将结果范围的单元格分配给范围variablesListRange。

我的代码的这部分似乎工作。 但是，当我尝试修改高级筛选器中的条件范围，以便使用范围N1：列N中最后一个被占用的单元格时，我得到一个应用程序定义或对象定义的错误。

我敢肯定，由于我的经验不足，我犯了一些明显的错误，但任何build议将不胜感激。

Sub Advance_Filter() Advance_Filter Macro Dim LastBlankRowE As Long Dim ListRange As Range LastBlankRowE = Worksheets("GWN parts").Cells(Rows.Count, 5).End(xlUp).Row Cells(LastBlankRowE, 5).Select Set ListRange = ActiveSheet.Range("A1", ActiveCell) Range("A2").Select Application.CutCopyMode = False Application.CutCopyMode = False ListRange.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ Range("N1", Cells(Rows.Count, 14).End(x1Up).Row), Unique:=False End Sub