共用方式為

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 屬性的目的是要與下列參數一起使用。

參數

描述

Direction

其中一個 XlDirection 值，用來指示尋找最後一個儲存格的方向。

如果您嘗試在不指定任何參數的情況下使用 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 命名空間