vb脚本宏命令实现excel表格批量删除包含指定关键词的行

0 vb脚本宏命令实现excel表格批量删除包含指定关键词的行

excel批量删除含有指定关键词的行.jpg

适用场景:

在一个excel表格中,有几千行或者及万行内容。其中有一些行含有“西瓜”这个词,我们想把含有西瓜这个词的行全部删掉,手动操作的话耗时很长,并容易出现遗漏和误删的情况。这时候,可以借助excel的宏命令,写入一个vb脚本来实现。

实现方法:

首先,需要把excel另存为后缀为xlsm的格式,因为这个格式才可以启用宏命令。保存好之后没打开这个文件,一次选择菜单栏的“开发工具--》宏”,然后输入宏名,点击创建。在出现的窗口中输入:

Sub DELCO()
Dim i As Integer
i = 0
xunhuan:
On error GoTo eend
Cells.Find(What:="西瓜").Select
Selection.EntireRow.Delete
i = i + 1
GoTo xunhuan
eend:
MsgBox (i & "行被删除了")
End Sub

输入之后,点击保存。

然后再次打开宏,选中刚才新建的那个宏名称,点击运行。大约一两秒左右会弹出X行被删除了。

这样批量删除包含关键词的行,效率高,而且可以避免误删的情况出现。

赞(1)
打赏 微信扫一扫微信 支付宝 QQ 扫码打赏
如若转载,请注明本文出自:https://www.guaitoo.com/show/175.html