Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Pivot tables - Sum instead of Count
Hi, What is the exact code which will give me Sum instead of Count for a Pivot Field? I have used following code but it gave me error Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Orientation = xlDataField Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Function = xlSum I got the following error Run-time error '1004' Unable to set the Function property of the PivotField class Can you help me? Regards -- hiunnati |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Pivot tables - Sum instead of Count
You could use code similar to this:
'========================== Sub PivotTest() Dim pt As PivotTable Dim pf As PivotField Set pt = Sheets("Summary").PivotTables("PivotTable1") Set pf = pt.PivotFields("Duration") With pf .Orientation = xlDataField .Function = xlSum End With End Sub '=================== hiunnati wrote: Hi, What is the exact code which will give me Sum instead of Count for a Pivot Field? I have used following code but it gave me error Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Orientation = xlDataField Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Function = xlSum I got the following error Run-time error '1004' Unable to set the Function property of the PivotField class Can you help me? Regards -- Debra Dalgleish Contextures http://www.contextures.com/tiptech.html |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Pivot tables - Sum instead of Count
Thanks!!! It works :) Debra Dalgleish Wrote: You could use code similar to this: '========================== Sub PivotTest() Dim pt As PivotTable Dim pf As PivotField Set pt = Sheets("Summary").PivotTables("PivotTable1") Set pf = pt.PivotFields("Duration") With pf .Orientation = xlDataField .Function = xlSum End With End Sub '=================== hiunnati wrote: Hi, What is the exact code which will give me Sum instead of Count for a Pivot Field? I have used following code but it gave me error Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Orientation = xlDataField Sheets("Summary").PivotTables("PivotTable1").Pivot Fields("Duration").Function = xlSum I got the following error Run-time error '1004' Unable to set the Function property of the PivotField class Can you help me? Regards -- Debra Dalgleish Contextures http://www.contextures.com/tiptech.html -- hiunnati |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Pivot tables: SUM not COUNT!!!!!!!! | Excel Discussion (Misc queries) | |||
Problems with updating category names in pivot tables | Excel Discussion (Misc queries) | |||
How do I keep file sizes small when using multiple pivot tables? | Excel Discussion (Misc queries) | |||
Blank Cells in Pivot Tables | Excel Discussion (Misc queries) | |||
Macro for Pivot Tables | Excel Discussion (Misc queries) |