我在VBA中以预先更新数据透视过滤器时遇到问题 . 我想要做的是使用记录集上的最新日期过滤数据透视表(我从Jet数据库获取数据) . 我已经尝试了以下MS Excel 2010的代码并且工作正常 . 我也在我们的一台计算机上的Excel 2007上试过这个并且工作正常 . 但是,当我在客户端PC上部署它时,它会在下面代码的最后一行返回“错误1004:应用程序定义或对象定义错误” . 奇怪的是我的客户端有Excel 2007 ..
你们知道为什么会这样吗?
ActiveSheet.PivotTables(sPivotName).PivotFields(sPivotField).CurrentPage = "(All)"
ActiveSheet.PivotTables(sPivotName).PivotFields(sPivotField).ClearAllFilters
ActiveSheet.PivotTables(sPivotName).PivotFields(sPivotField).CurrentPage = CStr(rsDate("MaxValue"))
1 回答
我能够通过将客户端PC上的Excel升级到Excel 2010来解决这个问题 . 虽然我仍然不知道为什么它在Excel 2007上不起作用 .