如果另一个Cell = TRUE，则在Cell上写入InputBox的结果

Question

如果单元格C4的文本为“TRUE”，我希望下面的代码在单元格L14上写入InputBox的结果。

    Sub dele()

    myValue4 = InputBox("What's the number?")

    If Range("C4").Value = "TRUE" Then
    Range("L14").Value = myValue4

    End If

似乎不起作用。有什么想法吗？

Answer 1

文本条件区分大小写。因此请尝试：

If Ucase(Range("C4").Value) = "TRUE" Then

但是，如果你只有Range中的布尔值（＆＃34; C4＆＃34;），这也应该有效：

If Range("C4").Value = True Then