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

如何查找空白单元格/仅带空格的单元格

1 个答案: