这程序就只是区域连续数据的判断
单击事件触发
一、
Dim var$ 相当于 Dim var as String
Dim var& 相当于 Dim var as Long
等等 符号只不过是简写罢了,现在已经不推崇使用了,规范写法还是用 as好了
二、
[i2]获取i2单元格对象 等同于Range和Cells方法,细节略有不同
三
Sheet2.[a1].CurrentRegion 是指获取与a1相连续的矩形数据区域 以空行或空列分割
如
[a1].CurrentRegion 就是获取的A1:D3区域
剩下的就只是一些逻辑判读罢了,你自己看看也能看懂
补充一句,写代码不给注释,简直不能忍