Excel查找空白单元格

Question

我尝试使用GUI和VBA查找并填写空白。

不幸的是，两个都没有找到最后一组空白。

示例：

如果我突出显示单元格1到20，并使用GUI（查找->转到->空白...。） 它仅突出显示已完成行上方的项目。与此代码类似

With Range("B1:B20").SpecialCells(xlCellTypeBlanks)

如果我突出显示17到20，并使用GUI，它将查找/突出显示最后一个空白单元格。 不单元格包含数据（我已经检查过）。我该如何使Excel不再停留在第17行

谢谢

Answer 1

尝试以下简单代码：

Sub HighlightBlanks1()
    Dim c
    For Each c In Range("B1:B20")
        If IsEmpty(c) Then
            c.Interior.ColorIndex = 3
        End If
    Next
End Sub
'or using your approach
Sub HighlightBlanks2()
    Range("B1:B20").SpecialCells(xlCellTypeBlanks).Interior.ColorIndex = 3
End Sub