Metoda NamedRange.Group —
Gdy NamedRange kontroli reprezentuje pojedynczą komórkę w zakresie danych pola tabeli przestawnej, Group metoda wykonuje numeryczny lub opartego na dacie grupowanie w tej dziedzinie.
Przestrzeń nazw: Microsoft.Office.Tools.Excel
Zestaw: Microsoft.Office.Tools.Excel (w Microsoft.Office.Tools.Excel.dll)
Składnia
'Deklaracja
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
)
Parametry
- Start
Typ: System.Object
Pierwsza wartość mają być grupowane.Jeśli ten argument zostanie pominięty lub true, pierwsza wartość w polu jest używana.
- End
Typ: System.Object
Ostatnia wartość mają być grupowane.Jeśli ten argument zostanie pominięty lub true, użyta zostanie ostatnia wartość w polu.
- By
Typ: System.Object
Jeżeli pole jest liczbą, ten argument określa rozmiar każdej grupy.Jeśli pole to jest data, ten argument określa liczbę dni w każdej grupie, jeśli element 4 w Periods tablica jest true i wszystkie inne elementy są false.W przeciwnym razie argument ten jest ignorowany.Jeśli ten argument zostanie pominięty, program Microsoft Office Excel automatycznie wybiera rozmiar grupy domyślnej.
- Periods
Typ: System.Object
Tablica siedmiu wartości logiczne, które określają okres, dla grupy, jak pokazano:
1 - Sekund
2 - Minut
3 - Godzin
4 - Dni
5 - Miesięcy
6 - Kwartałów
7 - Lat
Jeżeli element w tablicy jest true, grupa jest tworzona przez odpowiedni czas; Jeśli element jest false, grupa nie zostanie utworzona.Jeśli pole nie jest pole daty, argument ten jest ignorowany.
Wartość zwracana
Typ: System.Object
Uwagi
NamedRange Formant musi być pojedynczą komórkę w zakresie danych pola tabeli przestawnej.Jeśli podczas próby zastosowania tej metody do więcej niż jednej komórki, nie jest on (bez wyświetlania komunikat o błędzie).
Parametry opcjonalne
Aby uzyskać informacje o opcjonalnych parametrów, zobacz Parametry opcjonalne w rozwiązania dla pakietu Office.
Przykłady
Poniższy przykład kodu tworzy raport tabeli przestawnej i NamedRange wewnątrz obszaru raportu tabeli przestawnej.Następnie PivotTable, LocationInTable, PivotCell, PivotItem, i PivotField właściwości, aby wyświetlić informacje o rozmieszczaniu NamedRange w raporcie tabeli przestawnej.W przykładzie użyto również Group metodę należy zastosować grupowania numeryczne na podstawie pierwszej wartości w polu.
Ten przykład dotyczy dostosowywania poziomie dokumentu.
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"].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);
}
Zabezpieczenia programu .NET Framework
- Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Przy użyciu bibliotek z częściowo zaufanego kodu..