NamedRange.End 属性

获取一个 Microsoft.Office.Interop.Excel.Range，它表示包含 NamedRange 控件的区域末尾的单元格。

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

语法

声明
ReadOnly Property End As NamedRange_EndType
    Get

NamedRange_EndType End { get; }

属性值

类型：Microsoft.Office.Tools.Excel.NamedRange_EndType
一个 Microsoft.Office.Interop.Excel.Range，表示包含 NamedRange 控件的区域末尾的单元格。

备注

End 属性旨在与下列参数一起使用。

如果尝试在不指定任何参数的情况下使用 End，则 End 将获取一个 NamedRange_EndType 对象，该对象是 Visual Studio 基础结构的一部分，不应在代码中直接使用。

此属性与按 End+向上键、End+向下键、End+向左键或 End+向右键等效。

示例

下面的代码示例创建一个 NamedRange 并填充右侧的单元格，以便为空列所在的区域创建一个边界。 然后，它显示一个消息框，询问您是否选择 NamedRange 右侧区域的末尾。

此版本针对的是文档级自定义项。

Private endRange As Microsoft.Office.Tools.Excel.NamedRange

Private Sub SelectEnd()
    endRange = Me.Controls.AddNamedRange( _
        Me.Range("B1", "D4"), "endRange")
    Me.Range("H1").Value2 = 123
    endRange.Select()
    If MessageBox.Show("Select end of region to the right?", _
        "End of Region Test", MessageBoxButtons.OKCancel) = _
        DialogResult.OK Then
        Me.endRange.End(Excel.XlDirection.xlToRight).Select()
    End If
End Sub

Microsoft.Office.Tools.Excel.NamedRange endRange;
private void SelectEnd()
{
    endRange = this.Controls.AddNamedRange(
        this.Range["B1", "D4"], "endRange");
    this.Range["H1", missing].Value2 = 123;
    endRange.Select();
    if (MessageBox.Show("Select end of region to the right?", 
        "End of Region Test", MessageBoxButtons.OKCancel) == DialogResult.OK)
    {
        this.endRange.End[Excel.XlDirection.xlToRight].Select();
    }
} 

此版本针对的是应用程序级外接程序。

Private endRange As NamedRange

Private Sub SelectEnd()

    Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
Globals.ThisAddIn.Application.ActiveSheet

    Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
            Globals.Factory.GetVstoObject(NativeWorksheet)

    endRange = vstoWorksheet.Controls.AddNamedRange( _
        vstoWorksheet.Range("B1", "D4"), "endRange")
    vstoWorksheet.Range("H1").Value2 = 123
    endRange.Select()
    If System.Windows.Forms.MessageBox.Show( _
        "Select end of region to the right?", _
        "End of Region Test", _
        System.Windows.Forms.MessageBoxButtons.OKCancel) = _
        System.Windows.Forms.DialogResult.OK Then
        Me.endRange.End(Excel.XlDirection.xlToRight).Select()
    End If
End Sub

NamedRange endRange;
private void SelectEnd()
{
    Worksheet vstoWorksheet =
        Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]);
    endRange = vstoWorksheet.Controls.AddNamedRange(
        vstoWorksheet.Range["B1", "D4"], "endRange");
    vstoWorksheet.Range["H1", missing].Value2 = 123;
    endRange.Select();
    if (System.Windows.Forms.MessageBox.Show(
        "Select end of region to the right?",
        "End of Region Test", 
        System.Windows.Forms.MessageBoxButtons.OKCancel) ==
        System.Windows.Forms.DialogResult.OK)
    {
        this.endRange.End[Excel.XlDirection.xlToRight].Select();
    }
}

.NET Framework 安全性

• 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息，请参见通过部分受信任的代码使用库。

请参见

参考

NamedRange 接口

Microsoft.Office.Tools.Excel 命名空间