Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
468to472
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Suche Hilfe bei: TableName:="Pivot-Tabelle1"

Suche Hilfe bei: TableName:="Pivot-Tabelle1"
18.08.2004 12:30:11
Andy81
HAllo! Ich benötige Hilfe bei dem unten stehenden Code.
Diesen Code habe ich aufgenommen und SourceData geändert.
Das Problem ist, dass Excel die Pivottabelle automatisch benennt. Kann man den Tabellennamen irgendwie dynamisch gestalten?

Sub Pivot_erstellen()
Range("B2").Select
ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
ActiveWorkbook.ActiveSheets & Range(Cells(1, 1), Cells(65536, 7).End(xlUp)), TableDestination:="", _
TableName:="Pivot-Tabelle1"
ActiveSheet.PivotTables("Pivot-Tabelle1").AddFields RowFields:="Ergebnis"
ActiveSheet.PivotTables("Pivot-Tabelle1").PivotFields("Ergebnis").Orientation _
= xlDataField
End Sub

Danke im Voaraus
Andy81

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suche Hilfe bei: TableName:="Pivot-Tabelle1"
Holger
Kann man nicht einfach die Bezeichnung in TableName:="Pivot-Tabelle1" ändern?
Holger
AW: Suche Hilfe bei: TableName:="Pivot-Tabelle1"
18.08.2004 17:28:54
Andy81
Leider nicht. Trotzdem Danke.
HAbe es irgendwie mit einer Schleife und einem Vergleich hinbekommen. keine Ahnung wie, aber es funktioniert.
Andy81
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige