Run Time error '5'. Pivot Table error ....

[nonono]

What is wrong with the vba code?

 ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _        "LH EQM!R1C1:R1013221C21", Version:=6).CreatePivotTable TableDestination:= _
        "LH Pivot Table!R1C1", TableName:="PivotTable4", DefaultVersion:=6

 

[Yongle]

Is that the code from a recorded macro?
Microsoft issued guidance on this page