excel - 如何在不索引的情况下删除突出显示的单元格？

Question

我正在尝试删除所有以黄色突出显示的单元格，只留下未突出显示的值。但是，每次我删除突出显示的单元格时，它正下方的单元格都会索引到它的位置，因为该值向上移动到另一个单元格中，它在循环中被遗漏了。我可以防止突出显示的单元格下方的单元格向上索引吗？

Sub DeleteColoredCells()

    Dim Rng As Range
    Dim sCell As Range
    Set Rng = Range("A1:E4")
        For Each sCell In Rng
            If sCell.Interior.color = vbYellow Then
                sCell.Delete
            End If
        Next sCell
End Sub

Answer 1

如果您也想清除格式，请使用此选项。如果你不这样做，而不是 ClearContents使用 Clear

Sub DeleteColoredCells()

    Dim Rng As Range
    Dim sCell As Range
    Set Rng = Range("A1:E4")
        For Each sCell In Rng
            If sCell.Interior.color = vbYellow Then
                sCell.ClearContents
            End If
        Next sCell
End Sub