我正在创建一个vba脚本来为某些细节的细胞着色,到目前为止的进展顺利,但是现在我需要它为某些具有空值的单元格着色。这些细胞不是空白,它们具有公式,但有时该公式会返回"为价值。我需要选择这些特定的单元格,我该怎么做?
再次,这些单元格不是空的或空白的,只有它们的值为null。
不确定这是否是您想要的:
-
IsEmpty(ActiveCell)
检查单元格是否完全空。没有任何公式或数据。 -
ActiveCell.Value=""
检查单元格的结果是否为空白。(空白数据可以通过单元格中的公式返回)
因此,如果要检查单元格值是否为空白,但是有一个公式为 Not IsEmpty(ActiveCell) And ActiveCell.Value = ""
编辑
在评论中澄清后,代码将是:
Sub SelectEmpty()
Dim MyRange As Range
Dim Cell As Range
For Each Cell In Range("B18:H18")
If Cell.Value = "" Then
If MyRange Is Nothing Then
Set MyRange = Cell
Else
Set MyRange = Application.Union(MyRange, Cell)
End If
End If
Next Cell
MyRange.Select
End Sub
您可以通过条件格式更改这些单元格的颜色。
插入一个新规则,选择选项
Use a formula to determine wich values to format
,然后编写公式:
=TRIM(B18)=""