EXCEL中让所有引入外部数据的透视表和SQL查询表自适应路径和文件名更改

whsfhwm · 发表于 2010-6-12 21:39

学习了几位老师相关的帖子，整理并改写了一下，使得工作簿在引入外部数据查询方式获得查询表或透视表在移动文件位置或更改文件名的时候能正常刷新数据，具体见附件。
不适用于SQL语句中包含路径名和文件名的情形。

jooter · 发表于 2010-6-12 21:56

哇塞，第一次顶到第一位！
谢谢大侠给我这么好的位置！

whsfhwm · 发表于 2010-6-12 22:13

大家都关注世界杯去了，关注这个的人少了。
补充一句：1楼代码中，无论工作簿中有多少个SQL查询表或引入外部数据的透视表，都可以自适应的。

jooter · 发表于 2010-6-12 22:30

呵呵，谢谢大侠啊！帮了大忙了，今天搞了一上午，数据表删了在建，建了再删……
还是没有搞定，
什么是大侠？whsfhwm就是大侠！好样的，顶！

这个代码明天上班要好好研究一下。

大侠保重身体，早点休息啊！

whsfhwm · 发表于 2010-6-12 22:42

大侠不敢当。
谢谢支持和关心

xuanfly · 发表于 2010-6-13 07:37

具体怎么设置，能不能讲明白点，只看到你的透视表

抹香鲸2009 · 发表于 2010-6-13 08:10

VBA看不懂，才学一点点。楼主厉害

whsfhwm · 发表于 2010-6-13 09:10

原帖由 xuanfly 于 2010-6-13 07:37 发表
具体怎么设置，能不能讲明白点，只看到你的透视表

把VBA下面模块的代码以及thisworkbook里的open事件里的那行代码复制到你的文件里，就可以使用了。
之后代码在每次文件打开的时候自动执行，无需手动设置。

xuanfly · 发表于 2010-6-13 10:20

模块代码跟事件代码都复制了,我的文件还是不能自动更新,晕!

whsfhwm · 发表于 2010-6-13 11:08

方便的话，把你的附件传上来看看？

		自动登录	找回密码
密码			免费注册

[分享] EXCEL中让所有引入外部数据的透视表和SQL查询表自适应路径和文件名更改