ACCESS 大文字小文字を判定せずに部分一致検索する

ACCESS

2022.01.12 2021.06.26

ACCESSでLike（部分一致）検索かつ大文字小文字の判別をせずに検索する方法です。

大文字小文字は別のものとして判定されるため、StrConv関数を使って小文字か大文字のどちらかに変換を行った上で比較を行うようにします。

さらに、LIKEキーワードを利用して、部分一致検索を行い、よりあいまいなキーワードでもヒットするようにします。

以下、サンプルコード

Sub btn検索_Click()
    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim sql As String
    Dim strKey As String

    Set cn = CurrentProject.Connection
    Set rs = New ADODB.Recordset
    strKey = "Abc"

    sql = " SELECT * "
    sql = sql & " FROM TABLE_NAME"
    sql = sql & " WHERE StrConv([検索カラム名],1) LIKE '%" & StrConv(strKey, 1) & "%'"

    rs.Open sql, cn, adOpenStatic, adLockReadOnly

End Sub

※ADOを利用する場合、LIKE検索で前方一致や後方一致や部分一致を指定する際に利用するアスタリスク「*」はパーセント「%」で指定する必要があります。