[求助]数据透视表制作中数人头如何实现

mickwei

我要对表格制作pivottable数据透视来数人头.

其中RowFields和ColumnFields都没有问题,就是PivotFields("Global OHR ID"),它把ID的号码当作数字进行加总,而不是我想象中的进行headcount,如果要把ID进行数数的话,程序应该怎么改.请大侠指教.谢谢

Option Explicit

Private Sub CommandButton1_Click() ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:="Sheet1!R2C1:R473C20").CreatePivotTable TableDestination:=Range("U1"), TableName:="OHRform" ActiveSheet.PivotTables("OHRform").SmallGrid = False ActiveSheet.PivotTables("OHRform").AddFields RowFields:=Array("Updated Business Group"), ColumnFields:="Corporate Band" ActiveSheet.PivotTables("OHRform").PivotFields("Global OHR ID").Orientation = xlDataField Range("U1").Select End Sub

[此贴子已经被作者于2005-8-9 10:13:05编辑过]