Wie ändert man mehrere Feldeinstellungen in einer Pivot-Tabelle?
Wenn Sie eine Pivot-Tabelle in einem Arbeitsblatt erstellen, nachdem Sie die Felder in die Werte-Liste im PivotTable-Feldlisten-Bereich gezogen haben, erhalten Sie möglicherweise überall die gleiche Anzahl-Funktion, wie im folgenden Screenshot gezeigt. Nun möchten Sie aber die Summe-Funktion anstelle der Anzahl-Funktion auf einmal ersetzen. Wie können Sie die Berechnung mehrerer PivotTable-Felder auf einmal in Excel ändern?
Ändern Sie die Feldeinstellungen in der Pivot-Tabelle manuell nacheinander.
Ändern Sie mehrere Feldeinstellungen in der Pivot-Tabelle mit VBA-Code.
Ändern Sie die Feldeinstellungen in der Pivot-Tabelle manuell nacheinander.
In Excel können Sie die Berechnung der Feldeinstellungen ändern, indem Sie die Funktionen nacheinander im Dialogfeld „Feldeinstellungen für Werte“ ändern. Gehen Sie dazu wie folgt vor:
1. Wählen Sie ein Feld im Werte-Bereich aus, für das Sie die Zusammenfassungsfunktion in der Pivot-Tabelle ändern möchten, und klicken Sie mit der rechten Maustaste darauf, um „Feldeinstellungen für Werte“ auszuwählen. Siehe Screenshot:
2. Wählen Sie dann im Dialogfeld „Feldeinstellungen für Werte“ den gewünschten Berechnungstyp unter dem Reiter „Werte zusammenfassen nach“ aus. Siehe Screenshot:
3. Klicken Sie anschließend auf OK, um dieses Dialogfeld zu schließen, und Sie sehen, dass Ihre Anzahl-Funktion in die Summe-Funktion geändert wurde. Siehe Screenshot:
4. Wiederholen Sie die obigen Schritte, um die Berechnungseinstellungen anderer Felder nacheinander zu ändern.
Hinweis: Sie können die Feldeinstellungen auch ändern, indem Sie mit der rechten Maustaste auf eine Zelle eines Feldes klicken und „Werte zusammenfassen nach“ auswählen und dann die benötigte Berechnung aus den Kontextmenüs auswählen.
Ändern Sie mehrere Feldeinstellungen in der Pivot-Tabelle mit VBA-Code.
Die oben genannte Methode kann zeitaufwendig und mühsam sein, wenn viele Feldberechnungen geändert werden müssen. Hier kann ich Ihnen einen Code vorstellen, um mehrere Feldeinstellungen gleichzeitig zu ändern.
1. Klicken Sie auf eine beliebige Zelle in Ihrer Pivot-Tabelle.
2. Halten Sie die Tasten ALT + F11 gedrückt, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
3. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Ändern Sie mehrere Feldeinstellungen in der Pivot-Tabelle.
Public Sub SetDataFieldsToSum()
'Update 20141127
Dim xPF As PivotField
Dim WorkRng As Range
Set WorkRng = Application.Selection
With WorkRng.PivotTable
.ManualUpdate = True
For Each xPF In .DataFields
With xPF
.Function = xlSum
.NumberFormat = "#,##0"
End With
Next
.ManualUpdate = False
End With
End Sub
4. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und alle Feldeinstellungen in Ihrer ausgewählten Pivot-Tabelle wurden auf einmal in die gewünschte Berechnung konvertiert. Siehe Screenshots:
|
 |
 |
Hinweis: Im obigen Code können Sie die Summe-Funktion in beliebige andere Berechnungen ändern, z. B. Durchschnitt, Maximum, Minimum, je nach Bedarf. Sie müssen nur die Summe in diesen Skripten ändern: Public Sub SetDataFieldsToSum() und .Function = xlSum in andere Funktionen.
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins