VBA：单元不被接受为空，直到点击

我正在创build一个VBAmacros，我select所有空单元格。 它可以工作，但即使有些单元格是空的，Excel也不会将它们清空，除非双击它们。

有人知道这是为什么吗？

Answer 1

那些单元是具有零长度string的单元。
为了能够评估他们尝试使用Len函数。

例：

 Sub test() Dim cel, rng As Range, NoVal As Boolean, rngselection As String, i As Long Set rng = ThisWorkbook.Sheets(1).Range("A1:A5") rngselection = "" i = 1 For Each cel In rng NoVal = IIf(Len(cel.Value) = 0, True, False) If NoVal Then If i > 1 Then rngselection = rngselection & "," & cel.Address Else rngselection = cel.Address End If i = i + 1 End If Next cel Range(rngselection).Select End Sub 

这将selectRange("A1:A5")所有空单元格。
以上代码仅用于演示目的。