NamedRange.set_Value - метод

Статья
08/11/2011

Задает значение элемента управления NamedRange.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel (в Microsoft.Office.Tools.Excel.dll)

Синтаксис

'Декларация
Sub set_Value ( _
    rangeValueDataType As Object, _
    arg1 As Object _
)

void set_Value(
    Object rangeValueDataType,
    Object arg1
)

Параметры

rangeValueDataType
Тип: System.Object
Одно из значений XlRangeValueDataType, задающих тип данных для значения диапазона.Значение по умолчанию — xlRangeValueDefault.Этот параметр является необязательным в Visual Basic.

arg1
Тип: System.Object

Заметки

Если не нужно указывать необязательные параметры, можно использовать свойство Value вместо этого метода.

Необязательные параметры

Сведения о необязательных параметрах см. в разделе Необязательные параметры в решениях Office.

Примеры

В следующем примере кода показано, как использовать метод set_Value.

Эта версия предназначена для настройки уровня документа.

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

Эта версия предназначена для надстройки уровня приложения.

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

Безопасность платформы .NET Framework

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

NamedRange Интерфейс

Microsoft.Office.Tools.Excel - пространство имен

Поделиться через