首发于 SUT事务所
切换模式
【VBA初学者教程】- 第一章 VBA入门知识：引用命名单元格区域
Steven
Save Your(U) Time - 节约您的时间！
上一期图文教程已经为大家介绍了使用中括号[]快捷引用单元格以及自定义区域名称。通过自定义名称来引用单元格区域要比用A1样式更加容易标识单元格区域。因为我们更容易记住别人的名字，而不是一堆字母和数字。脑海突然飘来9527，啪啪打脸。
还记得上一期的宏代码SetValue吗？该代码就是对自定义的名称MyRange选区赋值为666。单元格区域有了名称，对区域内的所有单元格进行赋值，设置格式等等。
Sub SetColor()
'设置自定义名称MyRange单元格区域的字体颜色为红色
Range("MyRange").Font.Color = vbRed
End Sub 宏SetColor设置自定义名称MyRange（B2:F12）区域字体颜色为红色。
如果需要选定命名的单元格区域，可用GoTo方法，该方法将激活指定区域所在的工作簿和工作表，然后选定该区域，使用方法见如下代码：
Sub ClearRange()
'选中MyRange区域
Application.Goto Reference:="MyRange"
'清除选定区域内容
Selection.ClearContents
End Sub宏ClearRange先选中MyRange区域，然后执行ClearContents命令，清空单元格内容。
如果需要对自定义名称MyRange中的每一个单元格进行处理，可以使用For Each...Next循环语句在命名区域中的每一个单元格上循环。如果该区域中的任一单元格的值小于60，就将该单元格的背景色设置为红色，代码如下：
Sub ApplyColor()
Const limit As Integer = 60
'循环处理每一个单元格
For Each c In Range("MyRange")
If c.Value < limit Then
c.Interior.Color = vbRed
End If
Next c
End Sub代码演示如下动态图：
今天的介绍就到此结束了，如有疑问，欢迎加群交流，想要素材的小伙伴可以在公众号回复“20170630”得到哦~后期文章附带的素材，大家都可以通过在公众号回复该文档发送的日期得到，欢迎下载学习^_^Written by Steven in 20170630^_^
微信公众号：SaveUTime
SUT学习交流群：615356012，入群审核人：Steven
关注公众号，提高效率，节约您的时间！
编辑于 2017-08-18 08:40
VBA
入门指南
新手
文章被以下专栏收录
