NamedRange.Table أسلوب

مقالة
09/21/2010

قم بإنشاء جدول بيانات يستند إلى قيم الإدخال و الصيغ التي تقوم بتعريفه في ورقة عمل.

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

بناء الجملة

'إقرار
Function Table ( _
    RowInput As Object, _
    ColumnInput As Object _
) As Object

Object Table(
    Object RowInput,
    Object ColumnInput
)

المعلمات

RowInput
النوع: System.Object
خلية واحدة إلى لاستخدامه كإدخال صف الجدول الخاص بك.

ColumnInput
النوع: System.Object
خلية واحدة إلى لاستخدامه كإدخال عمود الجدول الخاص بك.

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

النوع: System.Object

ملاحظات

استخدام جداول بيانات إلى القيام بتحليل ماذا-لو بواسطة تغيير بعض قيم ثابتة في ورقة عمل الخاصة بك إلى معرفة كيفية تأثر القيم في خلايا الأخرى.

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

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

أمثلة

يستخدم المثال تعليمات برمجية التالي Tableأسلوب إلى إنشاء جدول الضرب منسقة في NamedRange.

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

    Private Sub CreateTable()
        Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("A1", "K11"), _
            "namedRange1")

        Me.Range("A1").Formula = "=A12*A13"
        Dim i As Integer
        For i = 2 To 11
            CType(Me.Cells(i, 1), Excel.Range).Value2 = i - 1
            CType(Me.Cells(1, i), Excel.Range).Value2 = i - 1
        Next i

        namedRange1.Table(Me.Range("A12"), Me.Range("A13"))
        Dim [region] As Excel.Range = Me.Range("A1").CurrentRegion
        CType([region].Rows(1), Excel.Range).Font.Bold = True
        CType([region].Columns(1), Excel.Range).Font.Bold = True
        CType([region].Columns, Excel.Range).AutoFit()
    End Sub

private void CreateTable()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "K11"],
        "namedRange1");

    this.Range["A1", missing].Formula = "=A12*A13";
    for (int i = 2; i <= 11; i++)
    {
        ((Excel.Range)this.Cells[i, 1]).Value2 = i - 1;
        ((Excel.Range)this.Cells[1, i]).Value2 = i - 1;
    }

    namedRange1.Table(this.Range["A12", missing],
        this.Range["A13", missing]);
    Excel.Range region = this.Range["A1", missing].CurrentRegion;
    ((Excel.Range)region.Rows[1, missing]).Font.Bold = true;
    ((Excel.Range)region.Columns[1, missing]).Font.Bold = true;
    ((Excel.Range)region.Columns).AutoFit();
}

أمن NET Framework.

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