可以使用宏录制获得相关代码，也可以查阅教程获得系统知识，我下面录制的两个宏，第一个是新建透视表的功能，第二个是添加一个行标签、数组字段的功能：自己写的代码的时候，里面的数据源可能需要修改为UsedRange或者CurrentRegion等方法确定的活动区域。

1,每次执行宏前，把sheet2中的数据透视表删掉，在你上面代码的开头，加上一句代码：ThisWorkbook.Worksheets("sheet2").Cells.Clear 2,把你上面黄色字体这部中的TableDestination＝"sheet2!R3C1"改成TableDestination:=ActiveSheet.Range("a4")实际上录制的代码是可以简化，下面这段代码是根据你的字段来写...

做数据透视表的时候主要是增加行的记录,增加列的标题的比较少,如果只是增加行的记录的话,直接选择整列作为数据源来做数据透视表就行了。例如数据区域A1:D10.可以选择A:D作为数据区域做数据透视表。 如果有新增的行记录的话,刷新数据透视表就行了.当然有一个叫"(空白)"的值看着比较碍眼,一般是在行...

ActiveSheet.PivotTables("数据透视表1").AddDataField ActiveSheet.PivotTables("数据透视表1" _).PivotFields("March"), "求和项:" & sheets("sheet1").range("a1") &", xlSum

分二步走 第一步：根据筛选条件生成一张新表；第二步：根据新表进行透视。如果想一步完成，那么就用vba。

点击“数据”选项卡，然后选择“全部刷新”，或者使用快捷键“Ctrl+Alt+F5”刷新数据透视表。9. 刷新数据透视表（方法四）：通过编写 VBA 代码实现自动刷新。按下“Alt+F11”进入 VBA 编辑器，输入代码后运行宏。确保在操作过程中，步骤与步骤之间逻辑清晰，每个步骤都应当且完整。如果在创建或更新...

将录制宏中生成数据透视表的语句中“TableDestination:="" ”修改成“TableDestination:="Sheet1!R1C1"”，这样每次都能在当前Excel工作表上的Sheet1的第一个单元格生产数据透视表。当然，根据需要，"Sheet1!R1C1"也可以改成其他的。

1、代码量太大，如果不是很广普的功能，实现起来总有得不偿失感觉。2、VBA代码还是不够强大，不能很好的实现设置参数保存，当文件关闭后再打开，原来透视表的个项设置参数不能被加载，也就不能自动重新计算了，需要重新设置数据透视表。当然可以把这些参数保存在数据表中，但这样做很不安全，我放弃了...

可以使用INDIRECT函数来返回引用。如果表名有规律，如Sheet1、Sheet2……SheetN，可以直接引用，如果表名没规律，得先用宏表函数取出表名，再引用。以下图为例，假设工作表分别为Sheet1-Sheet5，各表的A1单元格分别为1-5，汇总表在后面，要把各分表的A1单元格取到汇总表。方法一：表名有规律的方法...

重复此步操作,将按钮与相应的宏链接起来。 5.关闭“自定义”对话框,以后可以像使用普通工具栏一样,使用“专业符号”工具栏,向单元格中快速输入专业符号了。 五、用“视面管理器”保存多个打印页面 有的工作表,经常需要打印其中不同的区域,用“视面管理器”吧。 1.打开需要打印的工作表,用鼠标在不需要打...