小编致力于为大家奉献最有效的经验，让大家能够解决掉问题，但是大家也都知道，每个人遇到的情况都是不一样的，大家在看小编经验的同时，除了跟随操作，也需要自己的思考，举一反三的解决问题，这样才会变得更加有内涵，成为和小编一样的经验达人。excel中使用vba获取多个单元格区域的交叉范围，这里，让小编给大家介绍一下。
方法/步骤
-
1
首先我们打开一个工作样表作为例子。
-
2
在工作中，我们常常会遇到选择多个工作表区域，而两个工作表区域的交叉范围如果需要我们再去选取的话，需要非常的小心，不然选择错误了又得重新来过。
-
3
实际上我们用vba可以方便的对这个区域作出选择。我们使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Option Explicit
Sub quyu()
Dim rng1 As Range
Dim rng2 As Range
Dim rng As Range
Set rng1 = Sheets(1).Range("d6:g13")
Set rng2 = Sheets(1).Range("g11:k15")
Set rng = Application.Intersect(rng1, rng2)
'MsgBox rng.Address
rng.Formula = "=rand()"
End Sub
-
4
先定义一下三个变量为区域变量，然后将选择的两个区域分别赋值给rng1，rng2.这里使用intersect方法来求取两个范围的交叉区域。
-
5
这里使用msgbox来显示rng变量，不能直接使用，必须使用rng对象的address方法才有返回值。
-
6
但是rng变量可以直接用来赋值，我们可以直接使用rng.Formula = "=rand()"这样的方式来对交叉范围进行赋值。
-
7
先写到这里了，谢谢大家的观看。
祝大家生活愉快。
小编还有许多其他的经验可以观看，如果无法解决问题可以联系小编进行咨询。
看不清楚图片的可以点击放大再看哦。
END
文章评论