Что такое эквивалент "!= "в 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#, с++.
просто к сведению. Если вы хотите сравнить строку с ""
,в вашем случае, использовать
If LEN(str) > 0 Then
или даже просто
If LEN(str) Then
.