自动筛选器VBA帮助“错误1004”

我试图过滤一个名为“销售一级”的列名,它包含了大量的销售水平,我只需要“美洲,全球服务提供商,WW分销”,表中有从A到Y的列,共43295条logging。

这里是我的代码是抛出错误1004“自动过滤范围类失败的方法”

Dim objXLApp As Object Dim xlApp As Object Set xlApp = CreateObject("Excel.Application") xlApp.Activesheet.Range("$A1:$Y43295").AutoFilter Field:=16,_ Criteria1:=Array("Americas", "GLOBAL SERVICE PROVIDER", "WW Distribution"),_ Operator:=xlFilterValues 

我在这个函数中有其他代码,这是其中之一。

我想这是因为用“CreateObject”你开始一个新的Excel实例,以便ActiveSheet将是一个空的

而如果你想捕捉一个正在运行的Excel实例已经有适当的工作表为“积极”的一个

 Dim objXLApp As Object Dim xlApp As Object Set xlApp = GetObject(,"Excel.Application") xlApp.Activesheet.Range("$A1:$Y43295").AutoFilter Field:=16, Criteria1:=Array("Americas", "GLOBAL SERVICE PROVIDER", "WW Distribution"), Operator:=xlFilterValues