如果 LEN(Sheet1.Range("A1") > 0) 返回 0，但仍在运行代码？

Question

I have an If ElseIf statement that is not working as intended. Below is a sample of the code that I am working with:

If LEN(Sheet1.Range("A1") > 0) Then
     Do something

ElseIf LEN(Sheet1.Range("A2") > 0) Then
     Do something

The problem is that even when the length of A1 is 0 and the length of A2 is greater than 0 (which I have tested many times), the first If statement runs and completely ignores the ElseIf statement. I also set up a Debug.Print(LEN(Sheet1.Range("A1"))) statement under the first If statement and that also returns 0 in the console. I am not quite sure where the error is.

Any help is appreciated. Thank you

Answer 1

Do the following:

Sub Button_Click()
    If Len(Sheet1.Range("A1")) > 0 Then MsgBox "A1"
    If Len(Sheet1.Range("A2")) > 0 Then MsgBox "A2"
End Sub

The comparison must be outside the Len function, and you should not use elseif in this scenario.