Pivot-Tabelle per VBA erstellen

[Kladdi]

Hallo,

ich habe da folgendes Problem.
Ich will per VBA eine Pivot-Tabelle erstellen, sprich dass ich die Felder nicht mehr manuell hinzufügen muss.
Hab das dann mal mit dem Makro Rekorder aufgenommen und da kommt auch einigermaßen Schlüssiges
bei herum, aber trotzdem hab ich ziemlich am Anfang gleich ein auftretenden Fehler den ich weder lösen
noch mir irgendwie erklären kann.

Runtime Error '5':
Invalid procedure call or argument

An dieser Stelle tritt er auf:

Code [Auswählen] Erweitern

ActiveWorkbook.Worksheets("Pivot Support VALUE").PivotTables("PivotTable3"). _
        PivotCache.CreatePivotTable TableDestination:="Sheet15!R3C1", TableName:= _
        "PivotTable5", DefaultVersion:=xlPivotTableVersion14

Ich freu mich über jede Hilfe und Danke schon mal im Vorraus! 

Mfg Kladdi