NamedRange.Group-Methode
Wenn das NamedRange-Steuerelement eine einzelne Zelle im Datenbereich eines PivotTable-Felds darstellt, führt die Group-Methode eine numerische oder eine datenbasierte Gruppierung in diesem Feld aus.
Namespace: Microsoft.Office.Tools.Excel
Assembly: Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)
Syntax
'Declaration
Function Group ( _
Start As Object, _
End As Object, _
By As Object, _
Periods As Object _
) As Object
Object Group(
Object Start,
Object End,
Object By,
Object Periods
)
Parameter
- Start
Typ: System.Object
Der erste Wert, der gruppiert werden soll.Wenn dieses Argument weggelassen wird oder true ist, wird der erste Wert im Feld verwendet.
- End
Typ: System.Object
Der letzte Wert, der gruppiert werden soll.Wenn dieses Argument weggelassen wird oder true ist, wird der letzte Wert im Feld verwendet.
- By
Typ: System.Object
Wenn das Feld numerisch ist, gibt dieses Argument die Größe jeder Gruppe an.Wenn das Feld eine Datumsangabe ist, gibt dieses Argument die Anzahl der Tage in jeder Gruppe an, wenn das Element 4 im Periods-Array true ist und alle anderen Elemente false sind.Andernfalls wird dieses Argument ignoriert.Wenn dieses Argument weggelassen wird, wählt Microsoft Office Excel automatisch eine Standardgruppengröße aus.
- Periods
Typ: System.Object
Ein Array von sieben booleschen Werten, die den Zeitraum für die Gruppe folgendermaßen angeben:
1 - Sekunden
2 - Minuten
3 - Stunden
4 - Tage
5 - Monate
6 - Quartale
7 - Jahre
Wenn ein Element im Array true ist, wird eine Gruppe für die entsprechende Zeit erstellt. Wenn das Element false ist, wird keine Grupppe erstellt.Wenn das Feld kein Datumsfeld ist, wird dieses Argument ignoriert.
Rückgabewert
Typ: System.Object
Hinweise
Das NamedRange-Steuerelement muss eine einzelne Zelle im Datenbereich des PivotTable-Felds sein. Wenn Sie versuchen, diese Methode auf mehr als eine Zelle anzuwenden, schlägt die Methode fehl, ohne eine Fehlermeldung anzuzeigen.
Optionale Parameter
Informationen zu optionalen Parametern finden Sie unter Optionale Parameter in Office-Lösungen.
Beispiele
Im folgenden Codebeispiel werden ein PivotTable-Bericht und ein NamedRange innerhalb des Bereichs des PivotTable-Berichts erstellt. Anschließend werden mithilfe der Eigenschaften PivotTable, LocationInTable, PivotCell, PivotItem und PivotField Informationen zur Platzierung von NamedRange innerhalb des PivotTable-Berichts angezeigt. Im Beispiel wird außerdem die Group-Methode verwendet, um eine numerische Gruppierung auszuführen, die auf dem ersten Wert in dem Feld basiert.
Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.
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
private void DisplayPivotTableInformation()
{
// Specify values for the PivotTable.
this.Range["A1", missing].Value2 = "Date";
this.Range["A2", missing].Value2 = "March 1";
this.Range["A3", missing].Value2 = "March 8";
this.Range["A4", missing].Value2 = "March 15";
this.Range["B1", missing].Value2 = "Customer";
this.Range["B2", missing].Value2 = "Smith";
this.Range["B3", missing].Value2 = "Jones";
this.Range["B4", missing].Value2 = "James";
this.Range["C1", missing].Value2 = "Sales";
this.Range["C2", missing].Value2 = "23";
this.Range["C3", missing].Value2 = "17";
this.Range["C4", missing].Value2 = "39";
// Create and populate the PivotTable.
Excel.PivotTable table1 = this.PivotTableWizard(
Excel.XlPivotTableSourceType.xlDatabase,
this.Range["A1", "C4"],
this.Range["A10", missing], "Sales Table", false,
false, true, false, missing, missing, false, false,
Excel.XlOrder.xlDownThenOver, missing, missing, missing);
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", missing], "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, missing, missing, missing);
}
.NET Framework-Sicherheit
- Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.