hi there, change the following line in "PO_Spend_Report":

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=sh.Range("i1:l" & lrow), Version:=xlPivotTableVersion12).CreatePivotTable TableDestination:=target_sh.Range("a1"), TableName:="PT"
to

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:="PO Spend Report (Raw)!R1C9:R" & lrow & "C12").CreatePivotTable TableDestination:=target_sh.Range("a1"), TableName:="PT"