Creating two pivot tables on same sheet - Optimize recorded macro code

Hi, johnny_tc,

first of all the sheetname should be altered to "'Raw Data'" instead of "Raw Data".

Second: if you know the name of the PT as you have passed it in (like in the example):

    With ActiveSheet.PivotTables(cstrPT_One)
        .ColumnGrand = False
        .RowGrand = False
    End With

Ciao,
Holger