Método NamedRange.set_Value

Artigo
08/01/2011

Define o valor de NamedRange de controle.

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

Sintaxe

'Declaração
Sub set_Value ( _
    rangeValueDataType As Object, _
    arg1 As Object _
)

void set_Value(
    Object rangeValueDataType,
    Object arg1
)

Parâmetros

rangeValueDataType
Tipo: System.Object
Dentre as XlRangeValueDataType valores que especifica o tipo de dados do valor de intervalo.The default is xlRangeValueDefault.Este parâmetro é opcional em Visual Basic.

arg1
Tipo: System.Object

Comentários

Se você não precisa especificar os parâmetros opcionais, você pode usar o Value propriedade em vez do método.

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 demonstra como usar o set_Value método.

Esta versão é para uma personalização em nível de documento.

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

    Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("A2"), _
        "namedRange2")
    namedRange2.set_Value(Excel.XlRangeValueDataType.xlRangeValueDefault, _
        "Jones")
End Sub

private void SetValue()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", missing],
        "namedRange1");
    namedRange1.Value = "Smith";

    Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
        this.Controls.AddNamedRange(this.Range["A2", missing],
        "namedRange2");
    namedRange2.set_Value(Excel.XlRangeValueDataType.xlRangeValueDefault,
        "Jones");
}

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

Private Sub SetValue()

    Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
        Globals.ThisAddIn.Application.ActiveSheet

    Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
            Globals.Factory.GetVstoObject(NativeWorksheet)

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

    Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
        = vstoWorksheet.Controls.AddNamedRange(vstoWorksheet.Range("A2"), _
        "namedRange2")
    namedRange2.set_Value(Excel.XlRangeValueDataType.xlRangeValueDefault, _
        "Jones")
End Sub

private void SetValue()
{
    Worksheet vstoWorksheet =
        Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]);
    NamedRange namedRange1 =
        vstoWorksheet.Controls.AddNamedRange(
        vstoWorksheet.Range["A1", missing],
        "namedRange1");
    namedRange1.Value = "Smith";

    Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
        vstoWorksheet.Controls.AddNamedRange(
        vstoWorksheet.Range["A2", missing],
        "namedRange2");
    namedRange2.set_Value(Excel.XlRangeValueDataType.xlRangeValueDefault,
        "Jones");
}

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