excel 使用VB创建数据透视表（pivottable）问题

粘贴一段以前写的代码

供参考

Dim DataRng As Range '定义一个数据范围，用来储存生成数据透视表的数据

Dim MyPivot As Worksheet '定义一个工作表，存放数据透视表"

Dim pt As PivotTable '定义一个数据透视表，用来储存数据透视表对象”

Dim MyTable As Worksheet '定义一个工作表，做为汇总表

Dim ptcache As PivotCache

Set DataRng = Range("A1:D" & zuidazhi)

'

Set ptcache = ActiveWorkbookPivotCachesAdd(SourceType:=xlDatabase, SourceData:=DataRng)

SheetsAdd

Sheets("Sheet1")Select

Set pt = ptcacheCreatePivotTable(tabledestination:=Sheets("Sheet1")Range("b1"), TableName:="pivottable1")

With ActiveSheetPivotTables("pivottable1")PivotFields("采样时间")

Orientation = xlRowField

Position = 1

End With

With ActiveSheetPivotTables("pivottable1")PivotFields("样品名称")

Orientation = xlRowField

Position = 2

End With

With ActiveSheetPivotTables("pivottable1")PivotFields("分项")

Orientation = xlRowField

Position = 3

End With

ActiveSheetPivotTables("pivottable1")AddDataField ActiveSheetPivotTables("pivottable1" _

)PivotFields("值"), "计数项:值", xlCount

With ActiveSheetPivotTables("pivottable1")PivotFields("计数项:值")

Caption = "平均值项:值"

Function = xlAverage

End With

请用数据透视表和数据透视图向导，步骤一中有多重合并数据计算区域。默认情况下，在Excel2007的界面中是找不这个命令的。我们需要先把它添加到自快速访问工具栏上。右键点击快速访问工具栏，选择自定义快速访问工具栏，在“从下列位置选择命令中”选择“不在功能区中的命令”，然后在下面的命令列表中找到“数据透视表和数据透视图向导”命令，将其添加到快速访问工具栏即可。

数据透视表(PivotTable)是一种交互式的表，可以进行某些计算，如求和与计数等。所进行的计算与数据跟数据透视表中的排列有关。

当创建数据透视图报表时，Excel都会基于相同的数据创建一个相关联的数据透视表(相关联的数据透视表：为数据透视图提供源数据的数据透视表。 https：//copyrightbdstaticcom/vcg/creative/b6806a3ed8edc485ff5c5390e4c113d8jpg

1需要点击数据透视表中的某个单元格，再点击“分析”选项卡下的“数据透视图”功能按钮。

2打开“插入图表”的对话框后，我们选择为数据透视表选择一个“图形化”

3点击“确定”后即添加好选种的图形，在菜单栏中也同时出现“数据透视图工具”下的三个选项卡“分析”、“设计”与“格式”。

EXCEL中的数据透视表可以进行数据的求和与计数，做数据透视表求和步骤：

1、电脑打开Excel表格。

2、打开Excel表格后，全选数据，然后点击插入，选择数据透视表。

3、d出创建数据透视表页面，请选择单元格区域中会自动显示刚才全选的数据，无需再点击选择。

4、创建数据透视表页面下方，点击现有工作表，然后选择创建透视表的单元格，最后点击确定。

5、确定创建透视表后，在Excel右侧选择要透视表区域。

6、选择区域后，刚才选择的单元格就会出现透视表了。

7、点击其中一个单元格，就会自动跳转另一个页面，查看全部数据。

Pivot Table

数据透视表"  英文是 Pivot Table ，直接翻译是轴向旋转表 ，什么意思呢？ 及把我们的数据分成多个维度来进行统计，可以理解为我们平时说的简单报表。

(透视表？当初是那个白痴汉化的？)。举个例子来说明。

假设我们有如下的Excel数据表：

首先，我们要知道应用数据透视表的前提：数据量规范，需要汇总，且可随时对其形式进行变更。

一、创建数据透视表

1、 数据源的选择：要进行透视的数据区域全选，或只选择其中的一个单元格。

2、 数据透视表位置的选择：默认是将数据透视表放到一个新的工作表里，也可以手动选择现有工作表的某个位置。

二、数据透视表字段列表

行标签（行字段）：可以有多个行字段，并自由排列顺序

列标签（列字段）：同行，只是排列方式不同，行列混合则起到交叉的作用

筛选器（分页）：分页筛选的作用，看情况使用

值（汇总方式/显示方式）：求和、计数、平均值等汇总方式，显示方式可以显示百分比。双击数值可查看明细

用途：

1、提高Excel报告的生成效率。Excel数据透视表能够快速汇总、分析、浏览和显示数据，对原始数据进行多维度展现。数据透视表能够将筛选、排序和分类汇总等 *** 作依次完成，并生成汇总表格，是Excel强大数据处理能力的具体体现。

2、实现Excel的一般功能。数据透视表几乎涵盖了Excel中大部分的用途，无论是图表、排序、筛选、计算、函数等。

3、实现人机交互。而且它还提供了切片器、日程表等交互工具，可以实现数据透视表报告的人机交互功能。数据透视表最大的特点就是他的交互性。

4、数据分组处理。创建一个数据透视表以后，可以任意的重新排列数据信息，平且还可以根据习惯将数据分组。

数据透视表（Pivot Table）是一种交互式的表，可以进行某些计算，如求和与计数等。所进行的计算与数据跟数据透视表中的排列有关。

之所以称为数据透视表，是因为可以动态地改变它们的版面布置，以便按照不同方式分析数据，也可以重新安排行号、列标和页字段。每一次改变版面布置时，数据透视表会立即按照新的布置重新计算数据。另外，如果原始数据发生更改，则可以更新数据透视表。

数据透视表应用注意事项

1、数据透视表缓存。将现有数据透视表作为同一个工作簿中的新报表的源数据，则两张报表就可以共享同一个数据副本，会缩小工作簿文件，减少内存中的数据。

2、位置要求。如果要将某个数据透视表用作其他报表的源数据，则两个报表必须位于同一工作簿中。

3、更改会同时影响两个报表。在刷新新报表中的数据时，Excel也会更新源报表中的数据，反之亦然。如果对某个报表中的项进行分组或取消分组，那么也将同时影响两个报表。

4、数据透视图报表的相互影响。每当创建数据透视图报表时，Excel都会基于相同的数据创建一个相关联的数据透视表，要基于相关联的报表创建新报表。

在Access中可以用“数据透视表向导”来创建数据透视表。这种向导用Excel创建数据透视表，再用Microsoft Access创建内嵌数据透视表的窗体。

以上为[ 数据透视表有什么用 ]的所有答案，如果你想要学习更多这方面的知识，欢迎大家前往环球青藤教育官网！

环球青藤友情提示:以上就是[ 数据透视表有什么用 ]问题的解答,希望能够帮助到大家！

在资料表的活页上，选插入枢纽分析，不同的Excel版本位置不同，得找一下，举例来说，如在通讯录活页上 *** 作，有一栏叫城市，你想知道通讯录中各城市各有多少亲友，只要将城市拉到活页中右下角四格中左下角那格，再将名字拉到四格中右下角那格就会出现各城市中各有多少亲友的表格。

可以实际拉几次不同栏位看看就会了，再不行给我你的连络方式，用说的比较快

枢钮分析可以滙总复杂的资料表，例如在业务报表中计算全国某区某项产品的销量，这如果用筛选得好几个步骤，有些甚至做不出来，但枢纽只要拉二次就有了答案

枢钮最大的功能是它是活的，你可以任意拉动栏位，然后选取加总/平均/计数/最大/最小的各种计算功能，常资料表更新后，枢纽可以按更新或调整范围来更新