更改数据透视表的报表布局通过Excel VBA

我在Excel中使用VBA生成数据透视表。 默认情况下,报告布局是'Outline Form' 。 我怎样才能通过我的代码将其更改为'Compact form''Tabular Form' ? 任何帮助表示赞赏! 谢谢。

通过运行macroslogging器,我得到这个代码将其更改为Compact:

  ActiveSheet.PivotTables("PivotTable1").RowAxisLayout xlCompactRow 

为了将其纳入表格forms,当然:

 ActiveSheet.PivotTables("PivotTable1").RowAxisLayout xlTabularRow 

请记住,macros录像机是你的朋友。