【EXCEL VBA】Like演算子の否定を条件にしたい

Like演算子の否定を条件にする方法を紹介します。他言語を経験した人は「!」「エクスクラメーション」が頭に浮かぶと思いますが、 VBAでは「Not演算子」を使用します。

Not演算子を使って解決する

条件式の先頭にNotをつけるだけとなります。条件式をカッコで囲うかどうかは好みの問題ですが、筆者的には範囲が明確になるためカッコで囲うことをお勧めします。

サンプルプログラムを確認する(コピペOK)

Sub sample()
    If "abcdefg" Like "abc*" Then
        Debug.Print "OK1"            ' OK1が表示される
    End If
    
    If Not ("abcdefg" Like "abc*") Then
        Debug.Print "OK2"            ' OK2が表示されない
    End If
End Sub