16、[VBA入门到放弃笔记]|16、[VBA入门到放弃笔记] Intersect方法
Intersect方法用来表示两个或两个以上单元格区域的交集,它返回一个[Range]对象，此对象代表两个或多个范围重叠的矩形区域。
Sub 单元格区域交集()
Dim isect As Range
Set isect = Application.Intersect(Range("A1:B4"), Range("B4:D9"))
If isect Is Nothing Then
MsgBox "单元格区域没有交集"
Else
isect.Select '选中单元格区域的交集
End If
End Sub
- 【16、[VBA入门到放弃笔记]|16、[VBA入门到放弃笔记] Intersect方法】代码运行结果如下图,如果没有交集，isect翻返回nothing结果。
![16、[VBA入门到放弃笔记]|16、[VBA入门到放弃笔记] Intersect方法](https://img.it610.com/image/info10/ed5aa7b7c410415680028ea18b043b20.jpg)
文章图片
推荐阅读
- 一个人的碎碎念
- 野营记-第五章|野营记-第五章 讨伐梦魇兽
- Shell-Bash变量与运算符
- 清明，是追思、是传承、是感恩。
- 牛人进化+|牛人进化+ 按自己的意愿过一生
- 七老修复好敏感、角质层薄、红血丝
- 华为旁！大社区、地铁新盘，佳兆业城市广场五期！
- 标签、语法规范、内联框架、超链接、CSS的编写位置、CSS语法、开发工具、块和内联、常用选择器、后代元素选择器、伪类、伪元素。
- 螃蟹和这些食物同吃，轻则腹泻、重则中毒！要小心哦~
- 八、「料理风云」