您的位置: 首页 > EXCEL技巧 > ExcelVBA >

VBA批量更改数据透视表数据字段值汇总方式

时间:2013-12-13 整理:docExcel.net

如果需要更改Excel数据透视表数值区域中字段的值汇总方式,在字段较多的情况下,手动逐一更改显得有些繁琐。用下面的VBA代码可快速批量更改全部数据字段的值汇总方式。例如要将当前工作表中第一个数据透视表的所有数据字段值汇总方式改为“求和”,方法如下:

VBA批量更改数据字段值汇总方式

按Alt+F11,打开VBA编辑器,在代码窗口中粘贴下列代码:

Sub SumDataFields()
Dim ptField As PivotField
For Each ptField In ActiveSheet.PivotTables(1).DataFields
  With ptField
   .Function = xlSum
   .Caption = "求和项:" & .SourceName
  End With
Next
End Sub

关闭VBA编辑器,返回Excel工作表界面,按Alt+F8,打开“宏”对话框,选择“SumDataFields”宏执行即可。

《Excel分类汇总使用全攻略》Excel表格数据分类汇 问题:《Excel分类汇总使用全攻略》Excel表格数据分类汇
回答: Excel中分类汇总指的是在工作表中的数据进行了基本的数据管理之后,再使数据达到条理化和明确化的基础上,利用Excel本身所提供的函数,对数据进行了一种数据汇总数据的分类汇总是分为两个步骤进行的,第一个步骤是利...
Excel分类汇总实例教程 问题:Excel分类汇总实例教程
回答:这个操纵也可以直接拖相关的区域。 数据透视表在统计方面是很强大的,假如常常要统计数据的伴侣,可以去多相识这方面的成果,我想对你是会很有辅佐的哦!若要分类汇总,首先应该按需要统计的字段排序,才气将要举办...
Excel汇总专家 5.0 绿色版下载汇总Excel工作表汇总 问题:Excel汇总专家 5.0 绿色版下载汇总Excel工作表汇总
回答:...Excel文件中。您不需要编写任何Excel公式就能实现Excel表格数据的快速高效汇总,尤其适合介入归并的Excel文件数目不定,未便利用公式的环境。 2)汇总多个Excel文件的事情表有时你需要处理惩罚的事情表在多个差异的Excel文件中...
巧妙套用Excel2007表格样式进行数据汇总 问题:巧妙套用Excel2007表格样式进行数据汇总
回答:同事小张要对一份表格数据进行数据汇总,如果按照通常的方法来操作,显得太费时间了。有没有什么简单而又快速的方法呢?当然是有的,下面,我就教大家利用表格样式进行数据汇总。 ①首先,打开要进行处理的Excel表格...
EXEL表格文件如何汇总前面表格内的数据之和 问题:EXEL表格文件如何汇总前面表格内的数据之和
回答:Excel里面有函数汇总的。窗体下面的那个反E的符号找到汇总就OK啦。记得要选中你要汇总数据哦。或者你使用数据里面的分类汇总。希望能帮到你
Windows : 商务应用 : 电子制表 问题:Windows : 商务应用 : 电子制表
回答:...应用 : 电子制表周点击量top10 来自者:Excel报表是办公数据应用较量遍及的一种软件,但人们对数据报表的汇总运用方面的软件还不多见,往往生成的表格再次利用的机率较低,一般仅作为一次性输出报表利用。 《Excel2000汇...
相关知识:

下面内容对您也许有用

      话题:excel的数据透视表中,想批量设置一些字段的汇总方式为“平均
      问:如题,excel2010,现在默认就是求和,想全部改成平均值只能一个一个改,太费时间
      答:好像只能一个一个定义。 excel中数据透视表数据如何设成 excel数据透视表里怎么布局分页
      话题:帮忙制作一个宏或者VBA程序将数据按要求汇总成数据透视表
      问:背景:小弟奉老板命令制作一个包材需求报表,该包材需求报表由成品生产计划(见
      答:做好了,联系我吧.HI我即可 此文档有宏,该应用程序的宏语言 求助execl vba 宏的达人,怎么用
      话题:excel vba生成数据透视表
      问:Sheets("Sheet1").Cells(1,"A").Select Selection.CurrentRegion.Select
      答:创建前必须前创建的透视删除,不然就会出现1004错误提示(因为透视表是不可以叠加的)。你既然会VBA,就应该直接用VBA编写汇总表。 excel、数据透视表VBA:怎样 如何用excel 数据透视表VBA
      话题:求助execl vba 宏的达人,怎么用宏VBA创建下边这个数据透视表_
      问:原始数据表如下:id time 1 2012-12-21 1 2012-12-22 2 2012-12-21 2 2012-12-23
      答:这个VBA宏代码你可以让excel自己生成。你先打开宏-录制新宏 然后创建透视表,创建完成后,结束宏录制。在工作表标签上右击-查看代码,就可以看到自动生成的宏 EXECL中,一般什么情况下会用到 书店现在有07版数据透视表,07版
      话题:vba 实现多条件分类汇总
      答:这个问题正如楼上几位老师所言方法很多,但楼主即然要求VBA,且个人感觉用VBA可以灵活的根据自己所想得到结果,当然是用VBA好。如附件中,点按钮即得到结果表, 求VBA分类汇总代码 excel vba 问题 关于分类汇总
      话题:Excel数据透视表。是不是必须要先有数据,才建表。我们公司
      答:感觉你的表很直观,但不适合统计(我指的是表头横向重复、平铺)。我提个建议,仅供参考:1、按月建立工作薄;2、按品名建立工作表;3、工作表设置4列,分别是: excel统计、筛选、数据透视表、 EXCEL数据透视表统计数据更新
      话题:如何将excel表按类别拆分成不同工作表?我不会vba,也搞不来
      答:按楼主的意思,是把一个表中数据根据不同类别分成若干个类别工作表。不妨试试:数据/筛选/自动筛选,按自己需要类别单击下拉列表框选择得到筛选结果;再“编辑/ excel VBA中时间类型数据怎么 excel分类输出(vba
      话题:EXCEL vba 数据透视表 数据类型不匹配
      问:兄弟姐妹们啊,帮帮忙啊 row=wb1.Range("a1").End(xlDown).row' Set sel=wb1.
      答:这种读取数据方式,就好象读取Access表一样,里面有数据格式不一样时,就出现问题。我建议你用SQL读取后再用ADO。如我博客的实际例子:例1: EXCEL VBA中,如何判断数据类型 在excel VBA中如何判定单元格中
      话题:筛选excel中某一列不含有8位连续数字的行,其实它是数据透视表
      问:假设有一列数字,有字母(例如AAAAAA),有数字(8位,如15790989),还有兼字母和
      答:B2=IF(LEN(RIGHT(A2,MATCH(9^9,-RIGHT(A2,ROW($1:$8)))))=8,"",A2)CTRL+SHIFT+ENTER三键组合数组公式 向下复制(假设你的原数据在A列)然后 你再使用自动筛选 Excel单元格中如何添加下拉框并 EXCEL自动筛选下拉框只能列1000
      话题:数据透视表多重合并计算数据区域
      答:1.首先你做的这个叫数据透视表不是数据透视图。2.其次,在做数据透视表的时候如果是多重合并计算数据区域创建的透视表时,创建的透视表行字段只能有一个(数据源
最新评论