通过

NamedRange.Value 属性 (2007 system)

更新： 2008 年 7 月

获取或设置 NamedRange 控件的值。

命名空间：  Microsoft.Office.Tools.Excel
程序集：  Microsoft.Office.Tools.Excel.v9.0（在 Microsoft.Office.Tools.Excel.v9.0.dll 中）

语法

声明
<BindableAttribute(True)> _
<BrowsableAttribute(False)> _
Public Property Value As Object
用法
Dim instance As NamedRange
Dim value As Object

value = instance.Value

instance.Value = value

[BindableAttribute(true)]
[BrowsableAttribute(false)]
public Object Value { get; set; }

属性值

类型：System.Object

NamedRange 控件的值。

备注

Value 属性可以与下列可选参数一起使用。如果您指定可选参数，则在 Visual Basic 和 C# 中必须使用 set_Value 和 get_Value 访问器。

参数

说明

RangeValueDataType

XlRangeValueDataType 值之一，指定范围值的数据类型。默认值为 xlRangeValueDefault。

_arg1

NamedRange 控件的值。此参数仅与 set_Value set 访问器一起使用。

可选参数

有关可选参数的信息，请参见了解 Office 解决方案中的可选参数。

示例

下面的代码示例演示如何设置带有可选参数和不带可选参数的 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 vstoWorksheet As Worksheet = CType( _
        Me.Application.ActiveWorkbook.Worksheets(1),  _
        Excel.Worksheet).GetVstoObject()
    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 = ((Excel.Worksheet)
        this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
    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");
}

权限

另请参见

参考

NamedRange 类

NamedRange 成员

Microsoft.Office.Tools.Excel 命名空间

修订记录

日期

修订记录

原因

2008 年 7 月

添加了一个针对应用程序级外接程序的代码示例版本。

SP1 功能更改。