通过

WorksheetBase.ConsolidationOptions 属性

  • 项目

获取合并选项的三元素 Array。

命名空间：  Microsoft.Office.Tools.Excel
程序集：  Microsoft.Office.Tools.Excel.v4.0.Utilities（在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中）

语法

声明
Public ReadOnly Property ConsolidationOptions As Object
    Get

public Object ConsolidationOptions { get; }

属性值

类型：System.Object
合并选项的三元素 Array。

备注

如果返回的数组中的某个元素为 true，则相应的选项已设置。 该数组中的三个元素为：

元素

含义

1

使用首行中的标签

2

使用左列中的标签

3

创建指向源数据的链接

示例

下面的代码示例使用 ConsolidationOptions 属性显示当前工作表的合并选项的值。

此示例针对的是文档级自定义项。

Private Sub ShowConsolidationOptions()
    If Not (Me.ConsolidationOptions Is Nothing) Then
        Dim options As Array = CType(Me.ConsolidationOptions, Array)

        Me.Range("A1").Value2 = "Use labels in top row"
        Me.Range("A2").Value2 = "Use labels in left column"
        Me.Range("A3").Value2 = "Create links to source data"

        Dim i As Integer
        For i = 1 To 3
            If CBool(options.GetValue(i)) Then
                Me.Range("B" + i.ToString()).Value2 = "True"
            Else
                Me.Range("B" + i.ToString()).Value2 = "False"
            End If

            Me.Columns.AutoFit()
        Next i
    End If
End Sub

private void ShowConsolidationOptions()
{
    if (this.ConsolidationOptions != null)
    {
        Array options = (Array)this.ConsolidationOptions;

        this.Range["A1", missing].Value2 = "Use labels in top row";
        this.Range["A2", missing].Value2 = "Use labels in left column";
        this.Range["A3", missing].Value2 = "Create links to source data";

        for (int i = 1; i <= 3; i++)
        {
            if ((bool)options.GetValue(i))
            {
                this.Range["B" + i.ToString(),
                    missing].Value2 = "True";
            }
            else
            {
                this.Range["B" + i.ToString(),
                    missing].Value2 = "False";
            }
            this.Columns.AutoFit();
        }
    }
}

.NET Framework 安全性

请参见

参考

WorksheetBase 类

Microsoft.Office.Tools.Excel 命名空间