NamedRange.End-Eigenschaft

Ruft einen Microsoft.Office.Interop.Excel.Range ab, der die Zelle am Ende des Bereichs darstellt, die das NamedRange-Steuerelement enthält.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)

Syntax

'Declaration
ReadOnly Property End As NamedRange_EndType
    Get
NamedRange_EndType End { get; }

Eigenschaftswert

Typ: Microsoft.Office.Tools.Excel.NamedRange_EndType
Ein Microsoft.Office.Interop.Excel.Range, der die Zelle am Ende des Bereichs darstellt, der das NamedRange-Steuerelement enthält.

Hinweise

Die End-Eigenschaft ist zur Verwendung mit dem folgenden Parameter vorgesehen.

Parameter

Beschreibungen

Direction

Einer der XlDirection-Werte, der die Richtung angibt, in der die letzte Zelle gesucht werden soll.

Wenn Sie versuchen, End zu verwenden, ohne Parameter anzugeben, ruft End ein NamedRange_EndType-Objekt ab, das Teil der Visual Studio-Infrastruktur ist und nicht für die direkte Verwendung im Code vorgesehen ist.

Diese Eigenschaft ist äquivalent zu den Tastenkombinationen ENDE+NACH OBEN, ENDE+NACH UNTEN, ENDE+NACH LINKS oder ENDE+NACH RECHTS.

Beispiele

Im folgenden Codebeispiel wird ein NamedRange erstellt. Anschließend wird eine Zelle auf der rechten Seite aufgefüllt, um den Bereich leerer Spalten zu begrenzen. Danach wird ein Meldungsfeld angezeigt, in dem Sie gefragt werden, ob das Ende des Bereichs rechts vom NamedRange ausgewählt werden soll.

Diese Version bezieht sich auf eine Anpassung auf Dokumentebene.

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();
    }
} 

Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.

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-Sicherheit

Siehe auch

Referenz

NamedRange Schnittstelle

Microsoft.Office.Tools.Excel-Namespace