在excel2007中，如何自动运行宏里的程序
发布网友
发布时间：2022-04-21 08:16
共3个回答
热心网友
时间：2023-10-19 00:56
最简单的方法是为该宏设置一个快捷键。
热心网友
时间：2023-10-19 00:56
宏没问题，但是你使用的方法需要改善一下
假设你这个表是sheet1表，那你需要做工作表代码
即alt+F11，在工程窗口双击sheet1，将以下代码复制到空白区
Private Sub worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, [B:B]) Is Nothing Or Target.Count > 1 Then Exit Sub
Range("E1:F5").Select
ActiveSheet.PivotTables("数据透视表1").PivotCache.Refresh
end sub
效果是，当你修改B列内容时，自动激活宏代码刷新。修改其他内容，不会激活宏
热心网友
时间：2023-10-19 00:57
很简单，在宏编辑器里面点击透视表所在的sheet，把通用改为worksheet，声明改为chage，再插入你的宏。即为为以下：
Private Sub Worksheet_Change(ByVal Target As Range)'
' 刷新数据透视表 Macro
'
Range("E1:F5").Select
ActiveSheet.PivotTables("数据透视表1").PivotCache.Refresh
End Sub
或者不用宏，手动F9也可以的。：）
