Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA: returning subtotal range of pivot tables?????
I need my pivot tables to retain formatting after they are refreshed. So, I have a VBA module that does this by applying custom styles. It returns (calls) particular ranges in the pivot table and applys a particular custom style to each range. But, I can't figure out how to do this to subtotals. How do you return (select/call) a subtotal range from a pivot table??? I found this on the net but it does nothing for subtotals!: Sub ApplyStyles() With ActiveSheet.PivotTables(1) TableRange1.Style = "PivLabel" '\ style for cells above row area of table DataBodyRange.Style = "PivData" '\ style for data area RowRange.Style = "PivRow" '\ row area ColumnRange.Style = "PivColumn" '\ column headings TableRange1.EntireColumn.AutoFit '\ adjust row and cell heights to fit new style End With End Sub -- doog ------------------------------------------------------------------------ doog's Profile: http://www.excelforum.com/member.php...o&userid=32880 View this thread: http://www.excelforum.com/showthread...hreadid=526813 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
% of subtotal in pivot tables | Excel Worksheet Functions | |||
Pivot Tables: Subtotal only certain columns? | Excel Discussion (Misc queries) | |||
Subtotal(s) range in Pivot Tables. Is it Missing? | Excel Programming | |||
Pivot tables % of subtotal | Excel Discussion (Misc queries) | |||
Pivot Tables - Percents in subtotal | Excel Programming |