Sdílet prostřednictvím


NamedRange.set_Value – metoda

Nastaví hodnotu NamedRange řízení.

Obor názvů:  Microsoft.Office.Tools.Excel
Sestavení:  Microsoft.Office.Tools.Excel (v Microsoft.Office.Tools.Excel.dll)

Syntaxe

'Deklarace
Sub set_Value ( _
    rangeValueDataType As Object, _
    arg1 As Object _
)
void set_Value(
    Object rangeValueDataType,
    Object arg1
)

Parametry

Poznámky

Pokud potřebujete zadat volitelné parametry, můžete Value vlastnost namísto této metoda.

Volitelné parametry

Informace o volitelných parametrů, viz The Variable missing and Optional Parameters in Office Solutions.

Příklady

Následující příklad kódu ukazuje, jak použít set_Value metody.

Tato verze je přizpůsobení úrovni dokumentu.

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

Tato verze je aplikace- doplněkúroveň.

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

Zabezpečení rozhraní .NET Framework

Viz také

Odkaz

NamedRange Rozhraní

Microsoft.Office.Tools.Excel – obor názvů