使用VBA脚本删除某行之后的所有行。
ALT+F11打开“Visual Basic 编辑器”中。单击“插入”菜单,然后单击“模块”。
输入以下代码
Sub deleteRow()
For i = 1500 To 1603 Step 1Rows(i).Delete
i = i + 1
Next
End Sub
在“工具”菜单中指向“宏”并单击“宏”。
选择定义的宏
单击运行
使用VBA脚本删除某行之后的所有行。
ALT+F11打开“Visual Basic 编辑器”中。单击“插入”菜单,然后单击“模块”。
输入以下代码
Sub deleteRow()
For i = 1500 To 1603 Step 1End Sub
在“工具”菜单中指向“宏”并单击“宏”。
选择定义的宏
单击运行