Hi I am writing this code and getting stuck at line
oChart2.SetSourceData Source:=PT2.TableRange1
Dim data1, data2 As PivotCache
Dim PT1, PT2, PT3, PT4, PT5 As PivotTable
For Each ws In Worksheets
If ws.Name = "Bidding" Then
Application.DisplayAlerts = False
Worksheets("Bidding").Delete...