Question

VBScript中是否有办法检查单元格是否为空（看起来是空的）但是其中有一个公式？或者更确切地说，如何检查单元格中是否包含其他内容而不包含其中的公式？

Answer 1

您是否尝试过使用范围对象的公式属性？

例如：

在A1中放置一个公式

= IF（1 = 2，＆＃34; YAY＆＃34;＆＃34;＆＃34）

    Sub Test
        Dim r as Range
        Set r = Cells(1,1)
        if r.Formula = "" then
         msgbox "No Formula In This Cell!"
        elseif r.Formula = "" and r.Value2= "" then
         msgbox "This cell is totally empty."
        end if

    End Sub

Answer 2

所有公式都以＆＃34; =＆＃34;开头，所以也许你应该尝试：

If Left(Cell.Formula, 1) = "=" And Cell.NumberFormat <> "@"

根据Dan的输入进行编辑......两次

区分空单元格和包含公式的单元格

2 个答案: