excel怎么批量删除标红的行

Question

我有几百个标红行，怎么批量删除

Answer 1

1、按Ctrl F，调出查找对话框，点击对话框中的“选项”
2、点击“格式”右边的小三角，选中“从单元格选中格式”，在点击一次标红的单元格
3、点击“查找全部”，然后按Ctrl A全选
4、关闭查找对话框，右键点击被选中的任意一个单元格，删除，整行。

Answer 2

EXCEL2007有一个批量删除功能，不知道你的是07还是03？？
07的是：数据筛选--按颜色排序-删除就可！！03的应该也差不多！

Answer 3

是整行标红，还是单元格标红？
是字为红，还是格内填充为红？追问

整行的字都为红，无填充

追答

Sub dele_red_row()
Dim record_num As Integer
Dim i As Integer

record_num = Cells.Find("*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row
i = 1

While i <= record_num
Cells(i, 1).Select
If Selection.Font.ColorIndex = 3 Then
Selection.EntireRow.Delete
i = i - 1
record_num = record_num - 1
Else

End If
i = i + 1
Wend

End Sub

本回答被提问者采纳

Answer 4

对不起 我搞错了 不好意思啊