如何：使用代码引用工作表范围
使用类似的过程可以引用 NamedRange 控件或本机 Excel 区域对象的内容。
**适用于：**本主题中的信息适用于 Excel 2007 和 Excel 2010 的文档级项目和应用程序级项目。有关更多信息，请参见按 Office 应用程序和项目类型提供的功能。
使用 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";