excel中使用vba获取多个单元格区域的交叉范围

1、首先我们打开一个工作样表作为例子。

3、实际上我们用vba可以方便的对这个区域作出选择。我们使用alt陴鲰芹茯+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Option ExplicitSub quyu()Dim rng1 As RangeDim rng2 As RangeDim rng As RangeSet rng1 = Sheets(1).Range("d6:g13")Set rng2 = Sheets(1).Range("g11:k15")Set rng = Application.Intersect(rng1, rng2)'MsgBox rng.Addressrng.Formula = "=rand()"End Sub

5、这里使用msgbox来显示rng变量，不能直接使用，必须使用rng对象的address方法才有返回值。

7、先写到这里了，谢谢大家的观看。祝大家生活愉快。小编棵褶佐峨还有许多其他的经验可以观看，如果无法解决问题可以联系小编进行咨询。看不清楚图片的可以点击放大再看哦。