Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
496to500
496to500
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Name Pivottabelle

Forumthread: Name Pivottabelle

Name Pivottabelle
11.10.2004 12:48:11
Stefan
Hallo!
Über ein Macro versuche ich mit "ActiveSheet.PivotTableWizard" eine Pivottabelle erstellen zu lassen, auf deren Ergebnisse ich später im Macro zurückgreifen möchte. Leider ignoriert mein Excel den Wert "TableName" völlig und vergibt den Namen für das neue Tabellenblatt automatisch, sodass ich über das Macro nicht mehr zugreifen kann. Wie kann ich einen statischen Namen für das Sheet einrichten?
Vielen Dank
Stefan
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Name Pivottabelle
11.10.2004 12:51:27
Otto
Hallo Stefan,
Meine Testumgebung: Excel 8.0 SR-2, unter Windows 2000 SP-2
Bei PivotTabellen ist der Excel-Level von Relevanz, bitte gebe ihn an. Außerdem wäre es schön, Du würdest Dein Makro hier posten, damit der Fehler gefunden werden kann..
Gruß Otto
AW: Name Pivottabelle
EtoPHG
Hallo Stefan,
Nach Erstellen der Tabelle:
ActiveSheet.PivotTables("PivotTable1").Name = "DeinNameHier"
Gruss Hansueli
Anzeige
AW: Name Pivottabelle
11.10.2004 14:32:37
Stefan
Danke für die Hinweise, weiter bin ich allerdings nicht gekommen.
Excel habe ich in der Version 97 SR-2 (war nicht in der Auswahl).
Hier der Code aus dem Makrorecorder:
Sheets("Order").Select
Columns("G:T").Select
ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
"Order!C7:C20", TableDestination:="", TableName:="Pivot-Tabelle1"
ActiveSheet.PivotTables("Pivot-Tabelle1").AddFields RowFields:=" Lieferant "
With ActiveSheet.PivotTables("Pivot-Tabelle1").PivotFields(" Orders ")
.Orientation = xlDataField
.Name = "Summe - Orders "
.Function = xlSum
End With
Viele Grüße
Stefan
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige