Likeであいまい検索・ワイルドカード

2025年06月24日

Likeの使い方

シートの2行目から最後の行まで繰り返し処理を行い、「△△△」から始まる電話番号のみを黄色で塗りつぶします

Sub Like使い方()

    Dim i As Long, LastRow As Long

    'A列の最終行を取得します
    LastRow = Cells(Rows.Count, "A").End(xlUp).Row

    '2行目から最終行まで繰り返し、△△△から始まる番号の場合黄色で塗りつぶします
    For i = 2 To LastRow
        If Cells(i, "A").Value Like "△△△*" Then
            Cells(i, "A").Interior.Color = RGB(255, 255, 0) 'RGB(255,255,0)=黄色
        End If
    Next i

End Sub
    

実行結果

電話番号が「△△△」から始まる箇所のみを黄色で塗りつぶせました

ワイルドカード説明

ワイルドカード「*」の意味
   「*」はどんな内容が入っていても条件が満たされます。
       例）△△△*の場合
          △△△-○○○○-○○○○  条件一致
          電話番号は△△△-○○○○-○○○○  条件不一致

       例）*△△△*の場合
          △△△-○○○○-○○○○  条件一致
          電話番号は△△△-○○○○-○○○○  条件一致


ワイルドカード「?」の意味
   「?」は?となっている文字のみしか条件が満たされません
       例）△△△-???-○○○○の場合
          △△△-○○○-○○○○  条件一致
          △△△-○○-○○○○  条件不一致

関連記事

	CSVファイルをエクセルへ読み込みを行う方法
	フォルダを一括で作成する方法
	テキストファイルの読み込み