Anzeige
Archiv - Navigation
520to524
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
520to524
520to524
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Pivot+Makro

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pivot+Makro
Hübi
Hi Matthias,
da ist kein Makro zum Erstellen einer Pivot-Tabelle drin.
Gruß Hübi
AW: Pivot+Makro
Matthias
Ja, habe ich jetzt auch gemerkt.
Weisst Du denn wie man so etwas schreibt?
Wo kann ich Makros finden, die mir das Arbeiten mit PivotTable vereinfachen?
Matthias
Schmeiss doch mal den Recorder an...
Boris
Hi Matthias,
...und zeichne das auf - könnte dann so in der Art enden:
Option Explicit

Sub Makro1()
Range("A1:C22").Select
ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
"Tabelle1!R1C1:R22C3", TableDestination:="", TableName:="Pivot-Tabelle4"
ActiveSheet.PivotTables("Pivot-Tabelle4").AddFields RowFields:="Arbeiter", _
ColumnFields:="Wochentag"
ActiveSheet.PivotTables("Pivot-Tabelle4").PivotFields("Std").Orientation = _
xlDataField
End Sub

Grüße Boris
Anzeige
AW: Schmeiss doch mal den Recorder an...
Matthias
Wo platziere ich das Makro.
Modul oder wo?
Matthias
Nochmals: Schmeiss den Recorder an...
Boris
Hi,
...und zeichne die Erstellung der Pivottabelle auf. Der gepostete Code ist Ergebnis dieser Aufzeichnung - und platziert sich automatisch in einem neuen Modul.
Grüße Boris

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige