Quel est l'équivalent de "!=" dans Excel VBA ?

Question

Le problème est que != ne fonctionne pas comme une fonction dans excel vba.

Je veux pouvoir utiliser

If strTest != "" Then au lieu de If strTest = "" Then

Existe-t-il une autre approche pour faire cela, à part != ?

Ma fonction d'imitation != est

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

Answer 1

Parce que l'opérateur d'inégalité dans VBA est <>

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

l'opérateur != est utilisé en C#, C++.

Answer 2

En VBA, l'élément != est l'opérateur Not opérateur, comme ceci :

If Not strTest = "" Then ...

Answer 3

Juste une note. Si vous voulez comparer une chaîne de caractères avec "" ,dans votre cas, utilisez

If LEN(str) > 0 Then

ou même simplement

If LEN(str) Then

à la place.

Answer 4

Essayez d'utiliser <> au lieu de != .