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ファイルをエクセルへ読み込みを行う方法 |
![]() |
フォルダを一括で作成する方法 |
![]() |
テキストファイルの読み込み |