【VBA】Like演算子の色々な使い方

VBAで、変数などに特定の文字（または文字列）を含むかを判定する「Like演算子」について、色々な使い方を説明いたします。
基本的な使い方については、以下の記事をご覧ください。

VBAで、変数などに特定の文字（または文字列）を含んでいるかどうかを判定するには、「Like演算子」と「Instr関数」の2つの方法があります。

Like演算子の基本構文
パターン文字列で使う記号と文字リスト
Like演算子のコーディング例

Like演算子の基本構文

If 文字列 Like パターン文字列 Then
   条件が一致した場合の処理
End If

パターン文字列で使う記号と文字リスト

記号	説明
*	任意の数の文字
?	任意の１文字
#	任意の1文字の数字半角・全角どちらの数字にも一致する
[charlist]	文字リストcharlistに指定した文字の中の任意の1文字
[!charlist]	文字リストcharlistに指定した文字以外の任意の1文字

スクロールできます

Like演算子のコーディング例

* のサンプル

If Range("B2") Like "あ*" Then Range("C2") = "○"
If Range("B3") Like "*か*" Then Range("C3") = "○"

実行結果

? のサンプル

If Range("B4") Like "あ?" Then Range("C4") = "○"
If Range("B5") Like "あ?" Then Range("C5") = "○"
If Range("B6") Like "あ????" Then Range("C6") = "○"

# のサンプル

If Range("B7") Like "#" Then Range("C7") = "○"
If Range("B8") Like "#" Then Range("C8") = "○"
If Range("B9") Like "#" Then Range("C9") = "○"
If Range("B10") Like "#" Then Range("C10") = "○"
If Range("B11") Like "##" Then Range("C11") = "○"

[charlist] のサンプル

If Range("B12") Like "[a-z]" Then Range("C12") = "○"
If Range("B13") Like "[a-z]" Then Range("C13") = "○"
If Range("B14") Like "[あいう]" Then Range("C14") = "○"
If Range("B15") Like "[あいう]" Then Range("C15") = "○"

[!charlist] のサンプル

If Range("B16") Like "[!a-w]" Then Range("C16") = "○"
If Range("B17") Like "[!a-w]" Then Range("C17") = "○"
If Range("B18") Like "[!あいう]" Then Range("C18") = "○"
If Range("B19") Like "[!あいう]" Then Range("C19") = "○"