VBA条件格式化+删除单元格

有没有一种方法可以使用VBA删除整个行中的单元格？

尝试完成以下任务：

1. 在我的情况单元格值<3的基础上select整个行中的单元格
2. 删除整行

我使用CF来实现第一部分，但是当试图删除突出显示的单元格（来自CF的颜色）时，查找function找不到颜色。

任何人都可以redirect到一个特定的职位，请找几个小时。
丹科

Answer 1

怎么样这样的事情：

Sub Delete3() Dim F As Integer Dim Y As Integer Dim RngCount As Range Set RngCount = ActiveSheet.Range("COLUMN:COLUMN") Y = Application.WorksheetFunction.CountA(RngCount) For F = Y To 1 Step -1 If ActiveSheet.Range("COLUMN" & F).Value < 3 Then ActiveSheet.Rows(F).EntireRow.Delete End If Next F End Sub 

您只需将COLUMN一词replace为值所在列的字母，例如“C：C”和“C”。