如何删除excel中特定内容的行

Question

删除B列内容为“请删除我！”的所有行，是整行都删除，不是删除该内容！
数据“筛选”的方法我会，我要的方法是用VBA或是批处理。

Answer 1

VBA方法楼上已经说明，就不重复了！
查找法操作步骤：
1、选中B列
2、CTRL+F 查找 "请删除我"，查找全部
3、鼠标点选查找对话框下面的任意结果，CTRL+A(全选结果)
4、右键--删除--整行

Answer 2

Alt+F11 视图--代码窗口，如下复制进去，按F5 运行

sub shanchu()
for i=range("B65536").end(xlup).row to 1 step -1
if range("B" & i) ="请删除我" then rows(i).entirerow.delete
next
end sub

追问

我改编了下，凡D列内容为"高富帅" ，"屌丝"， "黑木耳"的行全部删除，为什么没反应，问题出哪儿了？
Sub shanchu()
For i = Range("B65536").End(xlUp).Row To 1 Step -1
If Range("D" & i) = "高富帅" Then Rows(i).EntireRow.Delete
If Range("D" & i) = "屌丝"Then Rows(i).EntireRow.Delete
If Range("D" & i) = "黑木耳" Then Rows(i).EntireRow.Delete
Next
End Sub

追答

For i = Range("B65536").End(xlUp).Row To 1 Step -1 ‘是指 从B列最后一行到第一行
如果你处理的是D列，建议改为 For i = Range("D65536").End(xlUp).Row To 1 Step -1

追问

如果我要忽略第一行呢，就是说第一行即使出现上述项目也不删除！第一行不参与，求教，解决了给你分，谢谢！

追答

For i = Range("D65536").End(xlUp).Row To 2 Step -1 ‘到第二行为止

Answer 3

如果使用函数公式，提供如下：
假如数据从A2单元格开始：
目标单元格公式：
=INDIRECT(CHAR(COLUMN(BM2))&SMALL(IF($B$2:$B$10000<>"请删除我！",ROW($A$2:$A$10000),4^8),ROW(A1)))&""
数组公式，格式柄右拉下拉复制公式

Answer 4

1.删除指定行，第二行开始
Sub 删除请删除我行()
Dim xRow As Integer
Dim i As Integer
xRow = Range("B65536").End(xlUp).Row
For i = xRow To 2 Step -1
If Cells(i, 2) = "请删除我" Then Cells(i, 2).Delete 3
Next
End Sub
2.删除全表有指定“请删除我”字符的所在行
Sub 删除请删除我行()
Dim cel As Range
For Each cel In ActiveSheet.UsedRange

If InStr(cel.Value, "请删除我") <> 0 Then

Rows(cel.Row).Delete

End If

Next
End Sub

Answer 5

合并，居中！