Что такое эквивалент "!= "в Excel VBA?

проблема в том, что != не работает как функция в excel vba.

Я хочу иметь возможность использовать

If strTest != "" Then вместо If strTest = "" Then

есть другой подход для этого, кроме !=?

моя функция имитировать != is

Sub test()

Dim intTest As Integer
Dim strTest As String

intTest = 5

strTest = CStr(intTest) ' convert

Range("A" + strTest) = "5"



    For i = 1 To 10
        Cells(i, 1) = i

        If strTest = "" Then
            Cells(i, 1) = i
        End If

    Next i


End Sub

4 ответов


потому что оператор неравенства в VBA <>

If strTest <> "" Then
    .....

оператор != используется в C#, с++.


в VBA != оператор Not оператор как это:

If Not strTest = "" Then ...

просто к сведению. Если вы хотите сравнить строку с "" ,в вашем случае, использовать

If LEN(str) > 0 Then

или даже просто

If LEN(str) Then
.

попробуйте использовать <> вместо !=.