这个不用用到宏，
第一种方法是筛选，然后删行睁除他。
第二种方法是查找，先选袭扒中A列，再点查找菜单------点查找全部-----点一下查找框中找到的答案----全部选择中（可按CRTL+A)-----然后档禅岁右键删除整行。
Sub Macro1()
'删除无用区域蔽拦
For i = [A65536].End(xlUp).Row To 1 Step -1
激腊 If InStr(Cells(i, 宏铅胡"A"), "某字符") > 0 Then Rows(i).Delete
Next
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024