Pivottabelle Excel 2003

30/03/2009 - 13:16 von Förster | Report spam
Hallo,

da die aufgezeichnete Pivottabelle nicht funktioniert (vermutlich wegen des
Namens "PivotTable1") habe ich andere Lösungen gesucht und folgende gefunden,
die auch funktioniert:

ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:=Bereich, _
Tabledestination:="", TableName:="Pivot"

With ActiveSheet.PivotTables("Pivot")

.PivotFields(" artnr").Orientation = xlRowField
.PivotFields(" bestand").Orientation = xlDataField
End with

Ich schaffe es aber nicht, die zusàtzlichen Kriteren, die ich bei der
RecorderAufzeichnung hatte, in dem obigen Code unterzubringen:
.Function = xlsum
.Numberformat =
Es kommen immer FehlerMeldungen wie: Eigenschaft konnte nicht zugeordnet
werden.

Danke für jede Hilfe.

Grüße
Renate
 

Lesen sie die antworten

#1 Alexander Wolff
30/03/2009 - 13:36 | Warnen spam
Die Tastatur von Förster wurde wie folgt gedrückt:
Ich schaffe es aber nicht, die zusàtzlichen Kriteren, die ich bei der
RecorderAufzeichnung hatte, in dem obigen Code unterzubringen:




Evtl. Schreibfehler Pivotfields (bin mit der Fehlermeldungsauswertung nicht
vertraut)?

Es kommen immer FehlerMeldungen wie: Eigenschaft konnte nicht
zugeordnet werden.


Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2

Ähnliche fragen