Hi,

Just add
pvt.AddDataField pvt.PivotFields("Item"), "Count of Serial Shipped", xlCount
Below

pvt.AddDataField pvt.PivotFields("Item"), "Count of Serial Rcvd", xlCount