一些用户可以运行 VBA，而其他用户则收到错误“下标超出范围”。
这是我第一次使用 VBA，所以我不确定是否能以最好的方式解释我的问题。 因此，我有一个应该使用 VBA 代码更新的数据透视表，但是，每次我尝试运行它时，它都会显示错误“下标超出范围”。奇怪的是，我公司的一些人可以运行它，并且我们可以访问相同的数据库。我不确定几个月前我是否能够运行它，但我知道一位同事现在可以运行它，现在他遇到了同样的错误，而且我们没有更改代码。我相信我们所有人都有相同的 Power Pivot 版本。 当我首次展示代码时，它在下一部分中失败了：
' Update pivot table
Sheets("Pivot").Activate
Sheets("Pivot").Range("E6").Select
ActiveWorkbook.ShowPivotTableFieldList = True
**ActiveSheet.PivotTables("BM_Pivot").CubeFields.GetMeasure _
"[" & dppNameStr & "].[TOTAL_ARREARS]",xlSum, "Sum of TOTAL_ARREARS"**
我确信代码是正确的，因为有些人可以运行它......有人知道如何解决这个问题吗？
It's my first time using VBA, so, I'm not sure if I'm going to explain my issue in the best way.
So, I have a pivot table that should be updated using the VBA code, however, every time I try to run it, it shows an error "subscript out of range". What is strange is that some people in my company can run it and we have access to the same databases. I'm not sure I was able to run it some months ago but I know that a colleague was and now, he is getting the same error and we didn't change the code. I believe that all of us have the same power pivot version.
When I debut the code, it failed in the next part:
' Update pivot table
Sheets("Pivot").Activate
Sheets("Pivot").Range("E6").Select
ActiveWorkbook.ShowPivotTableFieldList = True
**ActiveSheet.PivotTables("BM_Pivot").CubeFields.GetMeasure _
"[" & dppNameStr & "].[TOTAL_ARREARS]",xlSum, "Sum of TOTAL_ARREARS"**
I am sure that the code is correct since some people can run it...Does someone know how to solve this?
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论