作者：乔山办公网日期：
返回目录：excel表格制作
Sub 小按copy钮()
Sheet1.PivotTables("数据百透视度表1").PivotCache.Refresh
End Sub
透视表所在工作表.pivotables("透视表名称").pivotcache.refresh
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheet1.PivotTables("数据透视表1").PivotCache.Refresh
End Sub
在源数据中定义这个更好，每修改完知一个单元格数据后，自动刷新道透视表。
第一 看你是使用 搜索“常用”工具栏 然后通过找色来判断按钮位置 点击 进行操作 不过我想是不是可以用快捷键进行操作呢
我尝试了下 因为我一直使用WPS 至少它是支持后台命令来使用快捷键的 打开 关闭文件的操作都能用后台键盘命令完成 而且有一点 MS Office我不知道 但至少WPS是支持自定义快捷键的 只要把你需要用的作图 作图刷新 等命令设置一个较为简单的快捷键 后台来操作 应该就可以实现了
.
第二是 既然文件在被其他程序读写时 没法用Office插件 那可不可以关闭文件 读写 再打开文件 因为有快捷键的缘故 关闭文件用快捷键 打开文件用RunApp 不过这么做估计是有些伤硬盘了 后台录入我也没有实现 并且我也没有理解你所说的“通过识别字串符内容来用按键的方式录入”，所以现在对于如何录入打开状态下的XLS文件
呵呵，感谢仁兄的回答哦。思路很好，先说下我大致的脚本流程：就是先从一个软件里e799bee5baa6e997aee7ad94e58685e5aeb9336用读内存的方式得到一个数值，然后后台写入到一个EXL文件里（此EXL定为A），然后另一个EXL文件（此EXL定为B）再引用这个EXL文件的单元格来自动作图表。并且基本上每分钟自动输入一次数据到A文件。因为EXCEL里最低要一分钟才能自动刷新一次，但我需要只要检测到数据输入到A文件里B文件里就立即刷新出新数据来，想要这么作必须输入到A文件数据之后就点击保存，然后在B文件里刷新，这样就可以作到即时性了。可惜按键精灵毕竟功能上有点小弱，不支持后台组合键呢，只能识别单个按键。要不然这个问题就相当简单了。呵呵~（当然这个也可以通过前后按住CTRL 再后台输入S，然后再弹起CTRL的方式来解决，但是会小影响前台的正常操作。）
关于您所疑问的“通过识别字串符内容来用按键的方式录入”，其实就是假设数据是1234,根据函数挨个取值然后IF NUM=1 THEN 按键 1这样子，嘿嘿。不过现在这个问题解决了。我自己作了个小插件。可以后台在任何地方输入字符串了。
回答人的补充 2009-08-27 09:40 “可惜按键精灵毕竟功能上有点小弱，不支持后台组合键呢，只能识别单个按键。要不然这个问题就相当简单了。”
呵呵 我说的第一点想法想要表达的意思就是针对这点
事实上 在WPS里是支持快捷键重置的 包括最基础的Ctrl+S之类的快捷键 我们都可以把他设置成为 比如说 F5 这样只要对Excel的那个父窗口输出F5就行了
重置快捷键的方法是 在工具栏上右键 自定义工具栏 然后可以对工具栏 找到你需要更改的快捷键的命令 右键菜单 选择编辑 就有上图这个对话框了 呵呵 不过这办法有些取巧了
呵 建立两个文件来读写 颇有些曲线救国的意思 这问题蛮实用的 收藏着 保持关注~
对于Excel可以读取的格式 它是支持把这样的格式转换成表格的
所以我想 这样一来我们甚至可以自己输出一个TAB和回车组成的表格 然后读进Excel里 输出图表
上面所说的意义在于把表格变成字符串编辑 个人感觉字符串编辑还是比较熟悉的工作 操作起来也比直接编辑XLS文件要简单轻松些
试试WPS吧，主要是习惯了EXL，因为这里有一个前提，就是用了EXL的外部数据，就是一个文件里后台录数据，另一个文件是链接了这个数据文件里的数据自动绘图表，因为如果放在一个文件里那在编辑图表的时候就没办法录数据了，所以只好用了一个数据专用一个图表专用这样子两个EXL文件，呵呵~如果WPS也有这个功能，那再完美没有了。我的那些数据只是临时性的，也不需要非要带到EXL里去作。我虽然没有怎么接触过WPS，不过想来一些大致的功能都应该有的。
第一步百：添加一个按钮，如下图度1：
第二步：添加代码，知如下图2，代码如下
Sub 刷新道()
ActiveWorkbook.RefreshAll
End Sub
这样就可以实现自动刷新，但一般还需要使用offset函数回来实现源数答据的动态引用