vba怎样批量删除行

发布网友发布时间：2022-04-29 05:46

我来回答

共4个回答

热心网友时间：2022-06-20 01:09

1、在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】。

2、会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】。

3、会弹出模块编辑窗口。

4、在代码编辑窗口输入以下代码：Sub 删除行()Rows(2).delete，End Sub。

5、在VBA窗口，点击【运行】按钮。

6、工作表中第二空白行被删除了。

热心网友时间：2022-06-20 01:10

你那么些太慢了,看我的.
Range(rows(13),rows(15)).delete 这一句话把 13-15都删了.

Range(rows(17),rows(20)).delete 这一句话把 17-20都删了. 如果你有一万组,就用Union 语句,先联合起来再删一次,比较快,目前只有2组的话,删两句就行了.

热心网友时间：2022-06-20 01:10

每次都是删除的行都一样的话就用
rows("5:10").delete
rows("13:15").delete
rows("17:20").delete

每次都不一样的话就用
Selection.EntireRow.Delete

热心网友时间：2022-06-20 01:11

Sheet1.Rows("5:10").Delete Shift:=xlUp
Sheet1.Rows("13:15").Delete Shift:=xlUp
Sheet1.Rows("17:20").Delete Shift:=xlUp