Excel VBA Cell.Text vbNullString问题

时间:2015-06-19 15:03:52

标签: excel vba excel-vba

我有以下代码:

If cell.Text <> vbNullString Then
MsgBox "Hello"
End If

某些没有文字但包含公式的单元格仍然会触发消息框。单元格中没有任何可见的内容,当我这样做时

MsgBox cell.Text

消息框为空白。如果删除公式,则不会触发消息框。我能找到的唯一区别是违规单元格具有VarType 8,而其他单元格具有VarType 5.一些没有VarType 5文本的单元格不会触发MsgBox。两种细胞类型的公式格式相同。

我应该怎么做才能避免触发这些单元格的消息框? (MsgBox用于说明,它实际上执行其他代码)

1 个答案:

答案 0 :(得分:-1)

我在Excel中找不到名为cell的对象或属性。所以cell.Text应该给你一个运行时错误。您应该使用类似ActieSheet.Cells(1,1).Value的内容。

也就是说,要将单元格的内容与空字符串进行比较,您可以使用""(空字符串)。您应该将它与Value属性进行比较,而不是Text属性,因为后者是格式化版本。