April 2006
Beginner
1114 pages
98h 16m
English
pivottable.Format(Format)
Applies an autoformat to the pivot table.
|
Argument |
Settings |
|---|---|
|
|
An |
The following code applies an autoformat to a pivot table on the active worksheet:
Sub ApplyAutoFormat( )
Dim pt As PivotTable
' Run CreateOLAPPivotTable to create this pivot table.
Set pt = ActiveSheet.PivotTables(1)
' Apply format
pt.Format xlReport1
End SubRead now
Unlock full access