VBA案例精选 指定单元格区域内包含常量的单元格地址

代码运行结果：

代码截图：

代码文本：

Public Sub 技巧()

Dim myRange1 As Range, myRange2 As Range

Set myRange1 = ActiveSheet.UsedRange    '指定任意的单元格区域

Set myRange2 = myRange1.SpecialCells(xlCellTypeConstants)

myRange2.Select

MsgBox "指定单元格区域内输入有常量的单元格的地址为：" & myRange2.Address

Set myRange1 = Nothing

Set myRange2 = Nothing

End Sub

注释：

Range.SpecialCells 方法可以返回一个 Range 对象，该对象代表与指定类型和值匹配的所有单元格。
其语法如下：
表达式：SpecialCells(Type,Value)
其Type参数的可选XlCellType常量及对应值的表格大家可以问度娘哦。

【你们百度三天  不过我随口一句】
郑广学老师独家逐行手写沉浸式案例教学法 知其然更知其所以然
全套教程包含 VBA175例+函数操作408例+代码助手VIP
+100期直播回放
【268元进1000人高手VBA永久答疑群+880网站VIP】
买课咨询请加微信EXCEL880B

点击进入 郑广学老师Excel教程免费学7天 !

---

扫描二维码