如何：使用代码引用工作表范围
更新：2007 年 11 月
适用于 |
|---|
本主题中的信息仅适用于指定的 Visual Studio Tools for Office 项目和 Microsoft Office 版本。 项目类型
Microsoft Office 版本
有关更多信息，请参见按应用程序和项目类型提供的功能。 |
使用类似的过程可以引用 NamedRange 控件或本机 Excel 区域对象的内容。
使用 NamedRange 控件
下面的示例向工作表中添加一个 NamedRange 控件，然后向该区域内的单元格中添加文本。
引用 NamedRange 控件
将字符串分配给 Microsoft.Office.Tools.Excel.NamedRange 控件的 Value2 属性。此代码必须放置在一个表类中，而不是放在 ThisWorkbook 类中。
Dim NamedRange1 As Microsoft.Office.Tools.Excel.NamedRange = _ Me.Controls.AddNamedRange(Me.Range("A1"), "NamedRange1") NamedRange1.Value2 = "Range value"Microsoft.Office.Tools.Excel.NamedRange NamedRange1 = this.Controls.AddNamedRange(this.get_Range("A1", missing), "NamedRange1"); NamedRange1.Value2 = "Range value";
使用本机 Excel 区域
下面的示例向工作表中添加一个本机 Excel 区域，然后向该区域内的单元格中添加文本。
引用本机区域对象
向该区域的 Value2 属性赋予一个字符串。
Dim rng As Excel.Range = Me.Application.Range("A1") rng.Value2 = "Range value"Excel.Range rng = this.Application.get_Range("A1", missing); rng.Value2 = "Range value";