如何仅使用空格查找空白单元格/单元格

Question

我使用下面的VBA来查找A列到AY列的空白单元格。但是这段代码并没有帮助我识别只有空格且没有可用值的单元格。

我尝试了以下VBA代码

Dim Blank As Range

For Each Blank In Range(Range("A11:AY11"), Range("a" & Rows.Count).End(xlUp))
    If Blank = vbNullString Then
        Blank.Interior.ColorIndex = 3
    End If
Next Blank

请帮我编辑这个VBA，这样它也可以识别带空格的单元格。

Answer 1

尝试以下（仅由空格组成的修剪单元格将为空）

Dim c As Range

With Workbooks(REF).Sheets(REF)
    For Each c In .Range(.Range("A11:AY11"), Range("A" & .Rows.Count).End(xlUp))
        If Trim(c) = vbNullString Then
            c.Interior.ColorIndex = 3
        End If
    Next c
End With