Excel VBA教程:引用命名区域

用名称比用 A1 样式记号更容易标识单元格区域。若要命名选定的单元格区域,请单击编辑栏左端的名称框,键入名称,再按 Enter。

引用命名区域

下例引用了名为“MyBook.xls”的工作簿中的名为“MyRange”的单元格区域。


Sub FormatRange()
    Range("MyBook.xls!MyRange").Font.Italic = True
End Sub

下例引用名为“Report.xls”的工作簿中的特定工作表单元格区域“Sheet1!Sales”。


Sub FormatSales()
    Range("[Report.xls]Sheet1!Sales").BorderAround Weight:=xlthin
End Sub

若要选定命名区域,请用 GoTo方法,该方法将激活工作簿和工作表,然后选定该区域。


Sub ClearRange()
    Application.Goto Reference:="MyBook.xls!MyRange"
    Selection.ClearContents
End Sub

下例显示对于活动工作簿将如何编写相同的过程。


Sub ClearRange()
    Application.Goto Reference:="MyRange"
    Selection.ClearContents
End Sub

在命名区域中的单元格上循环

下例用 For Each...Next 循环语句在命名区域中的每一个单元格上循环。如果该区域中的任一单元格的值超过limit 的值,就将该单元格的颜色更改为黄色。


Sub ApplyColor()
    Const Limit As Integer = 25
    For Each c In Range("MyRange")
        If c.Value > Limit Then
            c.Interior.ColorIndex = 27
        End If
    Next c
End Sub

上页:Excel VBA教程:引用多个单元格区域 下页:Excel VBA教程:引用行和列

Excel VBA教程:引用命名区域

Excel VBA教程:引用行和列 Excel VBA教程:按索引编号引用工作表
Excel VBA教程:按名称引用工作表 Excel VBA教程:返回集合中的对象
Excel VBA教程:将文档保存为 Web 页 Excel VBA教程:选定和激活单元格
Excel VBA教程:代码运行时使用控件值 Excel VBA教程:设置控件属性
Excel VBA教程:在工作表上使用 ActiveX 控件 Excel VBA教程:Application对象事件的用法
Excel VBA教程:嵌入图表事件的用法 Excel VBA教程:在文档中使用 ActiveX 控件
Excel VBA教程:使用 Microsoft Excel对象事件的方法 Excel VBA教程:在窗体上使用 Microsoft Office Web 组件
Excel VBA教程:QueryTable对象事件的用法 Excel VBA教程:在 Visual Basic 中使用 Microsoft Excel 工作表函数
Excel VBA教程:工作簿对象事件 Excel VBA教程:处理三维区域
Excel VBA教程:处理图形(绘图对象) Excel VBA教程:处理活动单元格
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号