Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


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
to top
#2
Hallo Mike,

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

Plural: Daten
?mage

Misserfolg ist eine Chance, es beim
nächsten Mal besser zu machen.

(Henry Ford)
http://www.sprueche-zum-nachdenken.eu
to top
#3
...wenigstens ein Punkt ist schon gelöst Blush
to 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

Excel 2007
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Tabellen zuordnen / Pivot? Zarrokz 3 100 05.11.2016, 11:39
Letzter Beitrag: schauan
  Power Pivot – Pivot Tabelle erstellen NoFear070 1 119 11.10.2016, 19:41
Letzter Beitrag: WillWissen
  Excel-tabellen mit Daten Aus anderen Tabellen automatisch aktualisieren Slaydark 9 2.488 07.05.2015, 14:06
Letzter Beitrag: Slaydark

Gehe zu:


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