VBA 数据透视表的初步认识

本文介绍了VBA中如何创建数据透视表,通过录制宏解析代码,详细解释了PivotCaches、PivotTables和PivotFields的概念,并提供了简洁的代码示例,帮助读者理解数据透视表的生成过程。
摘要由CSDN通过智能技术生成

今天讲讲数据透视表,因为理解上花了一点时间,内容会比较少。

 

为了测试,先新建了一张这样的表

为了看看VBA中新建透视表的代码,框住上面的表格,插入了一张透视表,录制后的内容及代码如下:

Sub 宏1()
'
' 宏1 宏
'
'
    Range("A1:E23").Select
    Range("E23").Activate
    Sheets.Add
    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        "Sheet1!R1C1:R23C5", Version:=6).CreatePivotTable TableDestination:= _
        "Sheet2!R3C1", TableName:="数据透视表1", DefaultVersion:=6
    Sheets("Sheet2").Select
    Cells(3, 1).Select
    With ActiveSheet.PivotTables("数据透视表1")
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值