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

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

Я хочу использовать

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

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

Моя функция для имитации != -

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

Ответы

Ответ 1

Поскольку оператор неравенства в VBA равен <>

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

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

Ответ 2

В VBA оператором != является оператор Not, например:

If Not strTest = "" Then ...

Ответ 3

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

If LEN(str) > 0 Then

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

If LEN(str) Then

вместо этого.

Ответ 4

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