NamedRange.Group(Object, Object, Object, Object) Yöntem

Tanım

Ad Alanı:

Microsoft.Office.Tools.Excel

Bütünleştirilmiş Kod:

Microsoft.Office.Tools.Excel.dll

NamedRange Denetim PivotTable alanının veri aralığındaki tek bir hücreyi Group(Object, Object, Object, Object) temsil ettiğinde, yöntem bu alanda sayısal veya tarih tabanlı gruplandırma gerçekleştirir.

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

Parametreler

Start

Object

Gruplandırılacak ilk değer. Bu bağımsız değişken atlanırsa veya truealanındaki ilk değer kullanılır.

End

Object

Gruplandırılacak son değer. Bu bağımsız değişken atlanırsa veya truealanındaki son değer kullanılır.

By

Object

Alan sayısalsa, bu bağımsız değişken her grubun boyutunu belirtir. Alan bir tarihse, dizideki true 4 öğesi ise ve diğer tüm öğeler falseise, bu bağımsız değişken her gruptaki Periods gün sayısını belirtir. Aksi takdirde, bu bağımsız değişken yoksayılır. Bu bağımsız değişken atlanırsa, Microsoft Office Excel otomatik olarak varsayılan grup boyutunu seçer.

Periods

Object

Gösterildiği gibi grubun dönemini belirten yedi Boole değeri dizisi:1 - Saniye2 - Dakika3 - Saat4 - Gün5 - Ay6 - Çeyrekler7 - Yıl Dizideki bir öğe ise true, ilgili zaman için bir grup oluşturulur; öğe falseise, hiçbir grup oluşturulmaz. Alan bir tarih alanı değilse, bu bağımsız değişken yoksayılır.

Döndürülenler

Object

Örnekler

Aşağıdaki kod örneği bir PivotTable raporu ve PivotTable raporunun alanının içinde bir NamedRange rapor oluşturur. Ardından , LocationInTable, , PivotCell, PivotItemve PivotField özelliklerini kullanarak PivotTablePivotTable raporundaki yerleşimi NamedRange hakkında bilgi görüntüler. Örnekte, alandaki ilk değere göre sayısal gruplandırma gerçekleştirmek için yöntemi de kullanılır Group .

Bu örnek, belge düzeyinde özelleştirme içindir

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

Açıklamalar

Denetim, NamedRange PivotTable alanının veri aralığında tek bir hücre olmalıdır. Bu yöntemi birden fazla hücreye uygulamayı denerseniz başarısız olur (hata iletisi görüntülenmeden).

İsteğe Bağlı Parametreler

İsteğe bağlı parametreler hakkında bilgi için bkz. Office Çözümlerinde İsteğe Bağlı Parametreler.