Share via


Proprietà NamedRange.End

Ottiene un oggetto Microsoft.Office.Interop.Excel.Range che rappresenta la cella alla fine dell'area che contiene il controllo NamedRange.

Spazio dei nomi:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)

Sintassi

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

Valore proprietà

Tipo: Microsoft.Office.Tools.Excel.NamedRange_EndType
Oggetto Microsoft.Office.Interop.Excel.Range che rappresenta la cella alla fine dell'area che contiene il controllo NamedRange.

Note

La proprietà End deve essere utilizzata con il parametro riportato di seguito.

Parametro

Oggetto di descrizione

Direction

Uno dei valori XlDirection che indica la direzione nella quale trovare l'ultima cella.

Se si tenta di utilizzare End senza specificare alcun parametro, End otterrà un oggetto NamedRange_EndType che fa parte dell'infrastruttura di Visual Studio e non può essere utilizzato direttamente dal codice.

Questa proprietà equivale alla pressione delle seguenti combinazioni di tasti: FINE+freccia SU, FINE+freccia GIÙ, FINE+freccia SINISTRA o FINE+freccia DESTRA.

Esempi

Nell'esempio di codice riportato di seguito viene creato un controllo NamedRange, quindi viene compilata una cella a destra in modo da creare un limite per l'area di colonne vuote. Viene quindi visualizzata una finestra di messaggio in cui si chiede se selezionare la fine dell'area a destra del controllo NamedRange.

Questa versione è valida per una personalizzazione a livello di documento.

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

Questa versione è valida per un componente aggiuntivo a livello di applicazione.

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

Sicurezza di .NET Framework

Vedere anche

Riferimenti

NamedRange Interfaccia

Spazio dei nomi Microsoft.Office.Tools.Excel