ExcelHome技术论坛»论坛 › Excel 技术交流与问答 › Excel VBA程序开发 › VBA 数据透视表的操作

EH技术汇-专业的职场技能充电站	妙哉！函数段子手趣味讲函数	Excel服务器-会Excel,做管理系统	Excel Home精品图文教程库
HR薪酬管理数字化实战	Excel 2021函数公式学习大典	Excel数据透视表实战秘技	打造核心竞争力的职场宝典
300集Office 2010微视频教程	数据工作者的案头书	免费直播课集锦	ExcelHome出品 - VBA代码宝免费下载
	用ChatGPT与VBA一键搞定Excel	WPS表格从入门到精通	Excel VBA经典代码实践指南

查看: 1577|回复: 0

[求助] VBA 数据透视表的操作

[复制链接]

hyd1985

TA的精华主题

TA的得分主题

发表于 2013-9-7 17:04 | 显示全部楼层 |阅读模式

[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★免费下载 ★ ★ 使用帮助★

本帖最后由 hyd1985 于 2013-9-10 08:43 编辑

该贴为提问帖，因发布是归类错误，导致发送的版块错误，如果您是一位热心的人，可以帮我解决这个问题！
老生（想想这渐长的马齿不能称小生了）这厢有礼了

我要做一个数据透视表
前面是数据表
后面一个工作表是透视表，
我希望实现的功能是
当我点击第二个工作表的时候，透视表的数据自动刷新，透视表中关于日期的筛选项是今天的日期
问题是：
当我用录制的宏进行调试的时候出现如截图的错误
刷新数据透视表.jpg

ActiveSheet.PivotTables("数据透视表1").PivotCache.Refresh
ActiveSheet.PivotTables("数据透视表1").PivotFields("编码日期").CurrentPage = "2013/9/6"

是不是应当用：
ActiveSheet.PivotTables("数据透视表1").PivotFields("编码日期").CurrentPage = date
这样貌似也不成

求助, 在线求助

返回列表

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-23 17:14 , Processed in 0.034252 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

沪公网安备 31011702000001号沪ICP备11019229号-2

本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！本站特聘法律顾问：李志群律师

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

[求助] VBA 数据透视表的操作

最新热点 /1