Método NamedRange.Insert

Artigo
08/01/2011

Insere uma célula ou um intervalo de células para o NamedRange de controle e desloca as outras células para abrir espaço.

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

Sintaxe

'Declaração
Function Insert ( _
    Shift As Object, _
    CopyOrigin As Object _
) As Object

Object Insert(
    Object Shift,
    Object CopyOrigin
)

Parâmetros

Shift
Tipo: System.Object
Especifica como deslocar as células.Pode ser uma das seguintes XlInsertShiftDirection valores: xlShiftToRight or xlShiftDown.Se esse argumento for omitido, Microsoft Office Excel decidirá com base na forma do intervalo.

CopyOrigin
Tipo: System.Object
Dentre as XlInsertFormatOrigin valores que especifica onde obter o formato para aplicar novas células.

Valor de retorno

Tipo: System.Object

Comentários

Optional Parameters

Para obter informações sobre os parâmetros opcionais, consulte Parâmetros opcionais em soluções do Office.

Exemplos

O exemplo de código a seguir define os valores nas células A1 a A3 e usa o Insert método para inserir uma célula em branco em um NamedRange controle chamado NamedRange1 que é definida para a célula A1. Esta operação desloca as células no intervalo para baixo, que significa que NamedRange1 agora está definido para a célula A2. Para demonstrar isso, o exemplo define o valor de NamedRange1 para Raven, que exibe na célula A2.

Este exemplo é para uma personalização em nível de documento.

    Private Sub InsertIntoRange()
        Me.Range("A1").Value2 = "Robin"
        Me.Range("A2").Value2 = "Sparrow"
        Me.Range("A3").Value2 = "Crow"

        Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("A1"), _
            "namedRange1")

        namedRange1.Insert(Excel.XlInsertShiftDirection.xlShiftDown, )
        namedRange1.Value2 = "Raven"
    End Sub

private void InsertIntoRange()
{
    this.Range["A1", missing].Value2 = "Robin";
    this.Range["A2", missing].Value2 = "Sparrow";
    this.Range["A3", missing].Value2 = "Crow";

    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", missing],
        "namedRange1");

    namedRange1.Insert(Excel.XlInsertShiftDirection.xlShiftDown, missing);
    namedRange1.Value2 = "Raven";
}

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