不是删除整行,而是删除单元格(i,8)。此代码的作用是,对于直到最后一行的每个单元格,如果单元格以IM开头,则突出显示它,如果相应的单元格小于4,则删除该行。感谢
for i = 1 to LastRow Then
If Left(Cells(i, 1), 2) = "IM" Then
Cells(i, 1).Interior.Color = RGB(140, 220, 100)
If Cells(i, 8).Value <= 4 Then
Rows(i).EntireRow.Delete
End If
End If
next i
答案 0 :(得分:0)
打开即时窗口。写下这两个:
rows(5).entirerow.delete
rows(5).delete
看到第5行被删除。你的代码错了,你可能正在运行别的东西。