Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Pivot-Tabellen mit VBA
#1
Hallo Zusammen.
Ich muss per VBA eine Pivot-Tabelle erstellen. Diese ist relativ Simpel. Eine Beschriftung zu Anzahl der verschiedenen Datums (Mehrzahl von Datum ?, Egal)
Da meine bescheidenen VBA-Kenntnisse nicht bis zu Pivot Tabellen reichen, habe ich meinen Code durch ein Makro kreiert. Leider laufe ich auf einen mir nicht nachvollziehbaren Fehler.
Fehlermeldung: Laufzeitfehler 1004 Pivot Field Eigenschaft des PivotTable Objektes kann nicht zugeordnet werden.
Die Meldung erscheint bei der Zeile nach dem End With
Code:
Sub Dia()
'>>>>>>>>>>>Nummer 8<<<<<<<<<<<<<

Sheets("Diagramm").Select

   ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
       "DIA_Roh!R1C1:R1048576C10", Version:=xlPivotTableVersion14).CreatePivotTable _
       TableDestination:="Diagramm!R2C2", TableName:="PivotTable2", _
       DefaultVersion:=xlPivotTableVersion14
   Sheets("Diagramm").Select
   Cells(2, 2).Select
   With ActiveSheet.PivotTables("PivotTable2").PivotFields("lala")
       .Orientation = xlRowField
       .Position = 1
   End With
   ActiveSheet.PivotTables("PivotTable2").AddDataField ActiveSheet.PivotTables( _
       "PivotTable2").PivotFields("02.03.2015"), "Anzahl von 02.03.2015", xlCount

End Sub
Antworten Top
#2
Hallo Mike,

Zitat:Anzahl der verschiedenen Datums (Mehrzahl von Datum ?, Egal)

Plural: Daten
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#3
...wenigstens ein Punkt ist schon gelöst Blush
Antworten Top
#4
Hallo,

der nächste Punkt hängt wahrscheinlich mit diesem Punkt zusammen.
Gib die Datumsangabe mal so ein:

DateValue("02.03.2015")
Gruß Atilla
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste