用vba中的rows()实现选择行的问题

1、首先，打开或者新建一个Excel表格，如下图所示。

2、然后，按下Alt+F11组合键，打开VBA编辑界面，点击左侧相应的工作表，出现右侧空白的代码编辑区，如下图所示。

3、编写代码如下图所示。

4、将光标放在代码中间，点击“运行子程序”，如下图所示。

5、关闭VBA界面，返回Excel，就可以看到B1:D10内的原本合并的单元格都取消了合并，如下图所示。

'假设你的变量hang="10:10,11:11,15:15,16:16"

dim arr,rng

arr=split(hang,",")

set rng=rows(arr(0))

if ubound(arr)>0 then

    for i=1 to ubound(arr)

        set rng=union(rng,rows(arr(i)))

    next

end if

rng.select

直接给DataGridView指定一个ContexMenu右键菜单

在右键菜单的Opening事件中判断DataGridView是否有选中行，如果没有，则把 *** 作的菜单上禁用显示为灰色，或干脆e.Cancel()不d出了，如果有，则获取选择行集合的标识，按这些标识去数据库删除，然后重新绑定一下

---