超级透视表（power piovt），代码无法刷新。

mavin

有一段刷新所有透视表的代码，能刷新普通透视表，不能刷新超级透视表（power piovt）。
用录制宏的方法，录制了代码，但是再次执行，也不能刷新。

附件里都做好了示例，请高手们测试一下，看看有没有解决的方法。

hlxue

改了一下，可以刷新所有透视表了，你试下。请给好评+2分

mavin

感谢帮助，这个贴子我在群里发了2遍，都没有回复。
我上文心一言问了一下，得到的回复是vba不能刷新超级透视表，回答得像真的一样，我当时想，AI就是厉害，直接告诉我，实现不了，怪不得论坛上没人回复。
结果版主 taller直接给了答案，能实现。这个是论坛上我发在vba区域的相同帖子：
https://club.excelhome.net/forum ... ;page=1#pid11455616

今天上论坛，看到透视表区也有坛友回复，方法还不同，感谢坛友，感谢版主，感谢论坛。

不得不说，AI吹牛吹得还挺逼真。
我女儿跟文心一言聊天，我女儿问她，看没看过一本小说，还发了小说的封面图片。
文心一言回复说看过，我女儿问，主人公是谁，文心一言回复说，时间长，忘了。
文心一言还概况，这是一本描述爱情、理想......的感人小说，都是空洞的词语，我女儿马上跟我说，文心一言在胡说，肯定没看过这本小说。