NamedRange.Group أسلوب

عند NamedRangeعنصر تحكم يمثل خلية واحدة في نطاق بيانات حقل PivotTable، Groupينفذ أسلوب تجميع رقمي أو المستندة إلى التاريخ في هذا الحقل.

مساحة الاسم:  Microsoft.Office.Tools.Excel
التجميع:  Microsoft.Office.Tools.Excel (في Microsoft.Office.Tools.Excel.dll)

بناء الجملة

'إقرار
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
)

المعلمات

• Start
  النوع: System.Object
  أول قيمة يتم تجميع.إذا تم حذف هذه وسيطة أو true، أول يتم استخدام القيمة في الحقل.

• End
  النوع: System.Object
  القيمة الأخيرة إلى يمكن تجميعها.إذا كان th هو وسيطة هو تم حذفها أو true، القيمة الأخيرة في الحقل هو المستخدمة.

• By
  النوع: System.Object
  إذا كان حقل هو رقمية، هذه وسيطة بتحديد الحجم كل مجموعة.إذا كان الحقل هو تاريخ، رقم هو وسيطة بتحديد عدد الأيام في كل مجموعة في حالة عنصر 4 في Periodsصفيف هو trueوتكون الجميع العناصر الأخرى false.Otherwهوe, th هو وسيطة هو تجاهلها.في حالة حذف تلك وسيطة، اختار Microsoft المكتب Excel تلقائياً الحجم مجموعة افتراضية.

• Periods
  النوع: System.Object
  صفيفة من قيم المنطقية سبعة تحديد نقطة للمجموعة، كـ المعروضة:
  1 ثانية
  2 دقائق
  3 ساعات
  4 أيام
  5 أشهر
  6 أرباع
  7 سنين
  إذا كان أحد عناصر $ $ $ $ الصفيف هو true، مجموعة هو التي تم إنشاؤها للوقت المناسب؛ إذا هو عنصر false، توجد مجموعة هو تاريخ الإنشاء.إذا كان الحقل هو غير حقل تاريخ، رقم هو وسيطة هو تجاهلها.

القيمة المُرجعة

النوع: System.Object

ملاحظات

NamedRangeعنصر تحكم يجب أن تكون خلية واحدة في نطاق بيانات لحقول PivotTable. إذا قمت بمحاولة إلى قم بيطبق هذا الأسلوب إلى المزيد خلية واحدة، تفشل (دون عرض رسالة إعلام بالخطأ).

المعلمات الإختيارية

ل معلومات تشغيل معلمات اختيارية، راجع يفتقد المتغير و "المعلمات الاختيارية" في حلول Office.

أمثلة

يلي تعليمات برمجية المثال، يتم إنشاء تقرير PivotTable NamedRangeداخل المنطقة في تقرير PivotTable. ثم تستخدم PivotTable، LocationInTable، PivotCell، PivotItem، و PivotFieldخصائص إلى عرض معلومات حول الوضع NamedRangeداخل تقرير PivotTable. مثال كما يستخدم Groupأسلوب لتنفيذ تجميع الرقمية استناداً إلى الالقيمة الأولى في الحقل.

Th هو المثال هو لتخصيص المستوى مستند.

    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.

• الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.

راجع أيضًَا

المرجع

NamedRange واجهة

NamedRange الأعضاء

Microsoft.Office.Tools.Excel مساحة الاسم