101

問題は、!=excelvbaの関数として機能しないことです。

使えるようになりたい

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
4

4 に答える 4

159

VBAの不等式演算子は<>

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

演算子!=はC＃、C++で使用されます。

于 2012-07-21T20:57:13.417 に答える
29

VBA では、!=演算子は次のNotように演算子です。

If Not strTest = "" Then ...
于 2012-07-21T21:04:14.010 に答える
7

ただのメモ。あなたの場合、文字列を比較したい ""場合は、使用します

If LEN(str) > 0 Then

または単に

If LEN(str) Then

代わりは。

于 2014-12-12T08:18:30.773 に答える
2

<>の代わりに使用してみてください!=。

于 2012-10-30T12:04:36.473 に答える