樞紐分析表( PivotTable )是交叉分析的好幫手,還可以深入分析(drill-down)與彙總(roll-up)各個維度的資料。建立樞紐分析表也很容易,但有時候應用程式仍然有自動建立樞紐分析表的需求,Excel VBA 建立樞紐分析表的方式之一就是用 Worksheet.PivotTableWizard 方法。以Office範本藝廊的 銷售員樞紐分析表 來源資料為例: ActiveSheet.PivotTableWizard xlDatabase, Range(“A1:E800”), Range(“G3”) 即可產生樞紐分析表。如果沒有指定位置(TableDestination)的話,會放在 ActiveCell,如果也沒有 ActiveCell 的話,會放在新的工作表。 樞紐分析表會被加到 PivotTables 集合物件中,可經由 Worksheet.PivotTables 方法取得,例如: For Each oPvtTable In ActiveSheet.PivotTables oPvtTable.TableRange2.Clear Next 會清除工作表內所有的樞紐分析表 [1] 。 應用程式也可以設定樞紐分析表的屬性,例如透過欄位清單( PivotFields )設定欄位方向( XlPivotFieldOrientation ): Set oPvtTable = ActiveSheet.PivotTableWizard(xlDatabase, Range("A1:E800")) oPvtTable.PivotFields("國家").Orientation = xl xlPageField oPvtTable.PivotFields("銷售員").Orientation = xlRowField oPvtTable.PivotFields("訂單金額").Orientation = xlDataField 此外, Worksheet.PivotTableWizard 可以從不同的資料來源( XlPivotTableSourceType )建立樞紐分析表,以Access 範本資料庫 Northwind...