思考酒後

自分に入ってきた情報を定着、深化するために文章化

MENU

【Excelマクロ】任意の文字列を含むかどうかを判定するコード


 仕事をしていて任意の文字列が含んでいるかどうか(部分一致)を判定したくなり、いろいろ探した結果たどり着いたので自分用のメモとして記録を残しておきます。

 

f:id:masa_mn:20190628170156j:plain

 

任意の文字列を含むかどうかを判定するコード

 

Sub 任意の文字列を含むかどうかを判定するコード()

 Dim i As Integer

For i = 4 To 9

 If Cells(i, 3) Like "*2019年*" Then
  Cells(i, 4) = "○"
  Else: Cells(i, 4) = "×"
End If

Next i

End Sub

 

▽結果です。

f:id:masa_mn:20190628170156j:plain

 

応用:判定条件①どこかにある、判定条件②先頭にある、判定条件③末尾にある

  • 判定条件①どこかにある → "*2019年*"
  • 判定条件②先頭にある → "2019年*"
  • 判定条件③末尾にある → "2019年*"

 

以上。