Propriedade NamedRange.End

Artigo
08/01/2011

Obtém um Microsoft.Office.Interop.Excel.Range que representa a célula no final da região que contém o NamedRange de controle.

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

Sintaxe

'Declaração
ReadOnly Property End As NamedRange_EndType
    Get

NamedRange_EndType End { get; }

Valor de propriedade

Tipo: Microsoft.Office.Tools.Excel.NamedRange_EndType
A Microsoft.Office.Interop.Excel.Range que representa a célula no final da região que contém o NamedRange de controle.

Comentários

O End propriedade destina-se a ser usado com o parâmetro a seguir.

Parameter	Description
Direction	Dentre as XlDirection valores que indica a direção na qual localizar a última célula.

Se você tentar usar End sem especificar quaisquer parâmetros, End obterá uma NamedRange_EndType o objeto que é parte da infra-estrutura de Visual Studio e não se destina a ser usado diretamente em seu código.

Esta propriedade é equivalente a pressionar END + SETA para cima seta, END + SETA para baixo, END + seta à esquerda ou END + seta à direita.

Exemplos

O exemplo de código a seguir cria um NamedRange e, em seguida, preenche uma célula para a direita para criar um limite para a região de colunas em branco. Ele exibe uma caixa de mensagem perguntando se você deseja selecionar o fim da região à direita da NamedRange.

Esta versão é para uma personalização em nível de 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();
    }
}

Esta versão é um suplemento em nível de aplicativo.

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

Segurança do .NET Framework

Confiança total para o chamador imediato. O membro não pode ser usado por código parcialmente confiável. Para obter mais informações, consulte Usando bibliotecas de código parcialmente confiáveis.

Consulte também

Referência

NamedRange Interface

Namespace Microsoft.Office.Tools.Excel

Partilhar via