Skip to main content

VBA Excel 创建数据透视表

Excel 建数据透视表,首先选择现有工作表(Sheet)“录制宏”的数据,接着新建名为“数据分析”的工作表,最后在这一新建工作表存放该透视表。使用 Excel VBA 操作更简便,代码更精简。看以下 VBA 代码:

sub 创建数据透视表()
'
'创建数据透视表宏
'
'工作表操作
ActiveWorkbook.Sheets("录制宏").Select
Range("A4").Select
Set objTable = Sheet1.PivotTableWizard
    Sheets("Sheet1").Select
 Sheets("Sheet1").Move After:=Sheets(2)
    Sheets("Sheet1").Name = "数据分析"
end sub

《以上是 Excel 2010 VBA 入门与提高》第5节练习与思考1的解法。

外部链接:在 Excel 2010 中使用 VBA 创建数据透视表和图表

Comments

TOP