NamedRange.Group(Object, Object, Object, Object) Methode

Referenz

Definition

Namespace:: Microsoft.Office.Tools.Excel

Assembly:: Microsoft.Office.Tools.Excel.dll

Wichtig

Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.

Wenn das NamedRange-Steuerelement eine einzelne Zelle im Datenbereich eines PivotTable-Felds darstellt, führt die Group(Object, Object, Object, Object)-Methode eine numerische oder eine datenbasierte Gruppierung in diesem Feld aus.

public object Group (object Start, object End, object By, object Periods);

abstract member Group : obj * obj * obj * obj -> obj

Public Function Group (Optional Start As Object, Optional End As Object, Optional By As Object, Optional Periods As Object) As Object

Parameter

Start: Object

Der erste Wert, der gruppiert werden soll. Wenn dieses Argument weggelassen wird oder true ist, wird der erste Wert im Feld verwendet.

End: Object

Der letzte Wert, der gruppiert werden soll. Wenn dieses Argument weggelassen wird oder true ist, wird der letzte Wert im Feld verwendet.

By: Object

Wenn das Feld numerisch ist, gibt dieses Argument die Größe jeder Gruppe an. Wenn das Feld ein Datum ist, gibt dieses Argument die Anzahl der Tage in jeder Gruppe an, wenn Element 4 im Periods Array ist true und alle anderen Elemente sind false. Andernfalls wird dieses Argument ignoriert. Wenn dieses Argument weggelassen wird, wählt Microsoft Office Excel automatisch eine Standardgruppengröße aus.

Periods: Object

Ein Array von sieben booleschen Werten, die den Zeitraum für die Gruppe angeben, wie gezeigt: 1 - Sekunden2 - Minuten3 - Stunden4 - Tage5 - Monate6 - Quartale7 - JahreWenn ein Element im Array ist true, wird eine Gruppe für die entsprechende Zeit erstellt. Wenn das Element ist false, wird keine Gruppe erstellt. Wenn das Feld kein Datumsfeld ist, wird dieses Argument ignoriert.

Gibt zurück

Object

Beispiele

Im folgenden Codebeispiel werden ein PivotTable-Bericht und ein NamedRange im Bereich des PivotTable-Berichts erstellt. Anschließend werden die PivotTableEigenschaften , LocationInTable, PivotCell, PivotItemund PivotField verwendet, um Informationen zur Platzierung von innerhalb des NamedRange PivotTable-Berichts anzuzeigen. Im Beispiel wird auch die Group -Methode verwendet, um eine numerische Gruppierung basierend auf dem ersten Wert im Feld auszuführen.

Dieses Beispiel gilt für eine Anpassung auf Dokumentebene.

private void DisplayPivotTableInformation()
{
    // Specify values for the PivotTable.
    this.Range["A1"].Value2 = "Date";
    this.Range["A2"].Value2 = "March 1";
    this.Range["A3"].Value2 = "March 8";
    this.Range["A4"].Value2 = "March 15";

    this.Range["B1"].Value2 = "Customer";
    this.Range["B2"].Value2 = "Smith";
    this.Range["B3"].Value2 = "Jones";
    this.Range["B4"].Value2 = "James";

    this.Range["C1"].Value2 = "Sales";
    this.Range["C2"].Value2 = "23";
    this.Range["C3"].Value2 = "17";
    this.Range["C4"].Value2 = "39";

    // Create and populate the PivotTable.
    Excel.PivotTable table1 = this.PivotTableWizard(
        Excel.XlPivotTableSourceType.xlDatabase,
        this.Range["A1", "C4"],
        this.Range["A10"], "Sales Table", false,
        false, true, false, false, false,
        Excel.XlOrder.xlDownThenOver);

    Excel.PivotField customerField =
        (Excel.PivotField)table1.PivotFields("Customer");
    customerField.Orientation =
        Excel.XlPivotFieldOrientation.xlRowField;
    customerField.Position = 1;

    Excel.PivotField dateField =
        (Excel.PivotField)table1.PivotFields("Date");
    dateField.Orientation =
        Excel.XlPivotFieldOrientation.xlColumnField;
    dateField.Position = 1;

    table1.AddDataField(table1.PivotFields("Sales"),
        "Sales Summary", Excel.XlConsolidationFunction.xlSum);

    // Create a NamedRange in the PivotTable and display the 
    // location.
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(
        this.Range["B11"], "namedRange1");
    namedRange1.Select();

    MessageBox.Show("The NamedRange is in the PivotTable report '" +
        namedRange1.PivotTable.Name + "' at the location '" +
        namedRange1.LocationInTable.ToString() + "'.");

    MessageBox.Show("The NamedRange has a PivotCell type of: " +
         namedRange1.PivotCell.PivotCellType.ToString());

    MessageBox.Show("The NamedRange is in the PivotTable field: " +
         namedRange1.PivotField.Name);

    MessageBox.Show("The NamedRange is in the PivotTable item: " +
        namedRange1.PivotItem.Name);

    namedRange1.Group(true);
}

Private Sub DisplayPivotTableInformation()
    ' Specify values for the PivotTable.
    Me.Range("A1").Value2 = "Date"
    Me.Range("A2").Value2 = "March 1"
    Me.Range("A3").Value2 = "March 8"
    Me.Range("A4").Value2 = "March 15"

    Me.Range("B1").Value2 = "Customer"
    Me.Range("B2").Value2 = "Smith"
    Me.Range("B3").Value2 = "Jones"
    Me.Range("B4").Value2 = "James"

    Me.Range("C1").Value2 = "Sales"
    Me.Range("C2").Value2 = "23"
    Me.Range("C3").Value2 = "17"
    Me.Range("C4").Value2 = "39"

    ' Create and populate the PivotTable.
    Dim table1 As Excel.PivotTable = _
        Me.PivotTableWizard( _
        Excel.XlPivotTableSourceType.xlDatabase, _
        Me.Range("A1", "C4"), Me.Range("A10"), "Sales Table", _
        False, False, True, False, , , False, False, _
        Excel.XlOrder.xlDownThenOver, , , )

    Dim customerField As Excel.PivotField = _
        CType(table1.PivotFields("Customer"), Excel.PivotField)
    customerField.Orientation = _
        Excel.XlPivotFieldOrientation.xlRowField
    customerField.Position = 1

    Dim dateField As Excel.PivotField = _
        CType(table1.PivotFields("Date"), Excel.PivotField)
    dateField.Orientation = _
        Excel.XlPivotFieldOrientation.xlColumnField
    dateField.Position = 1

    table1.AddDataField(table1.PivotFields("Sales"), _
        "Sales Summary", Excel.XlConsolidationFunction.xlSum)

    ' Create a NamedRange in the PivotTable and display the 
    ' location.
    Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("B11"), _
        "namedRange1")
    namedRange1.Select()

    MessageBox.Show("The NamedRange is in the PivotTable report '" & _
        namedRange1.PivotTable.Name & "' at the location '" & _
        namedRange1.LocationInTable.ToString() & "'.")

    MessageBox.Show("The NamedRange has a PivotCell type of: " & _
        namedRange1.PivotCell.PivotCellType.ToString())

    MessageBox.Show("The NamedRange is in the PivotTable field: " & _
        namedRange1.PivotField.Name)

    MessageBox.Show("The NamedRange is in the PivotTable item: " & _
        namedRange1.PivotItem.Name)

    namedRange1.Group(True, , , )
End Sub

Hinweise

Das NamedRange Steuerelement muss eine einzelne Zelle im Datenbereich des PivotTable-Felds sein. Wenn Sie versuchen, diese Methode auf mehrere Zellen anzuwenden, schlägt sie fehl (ohne dass eine Fehlermeldung angezeigt wird).

Optionale Parameter

Informationen zu optionalen Parametern finden Sie unter Optionale Parameter in Office-Projektmappen.

Gilt für:

Freigeben über