こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Access フォームで検索した結果をフォームで表示するときにあいまい検索をしたい

Access2003を使用して、検索フォームをつくり、検索結果を別フォームへ表示させるプログラムを組みました。
その際に、かな検索をするとかなが完全一致でないと検索されません。
あいまい検索にてかな検索をする方法はありませんでしょうか?

ソースは以下の通りです。
Private Sub cmdSearch_Click()
On Error GoTo Err_cmdSearch_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = ChrW(70) & ChrW(95)

stLinkCriteria = "[カナ氏名]=" & "'" & Me![カナ氏名] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdSearch_Click:
Exit Sub

Err_cmdSearch_Click:
MsgBox Err.Description
Resume Exit_cmdSearch_Click

End Sub

投稿日時 - 2009-09-07 13:55:24

QNo.5270026

困ってます

質問者が選んだベストアンサー

>stLinkCriteria = "[カナ氏名]=" & "'" & Me![カナ氏名] & "'"
stLinkCriteria = "[カナ氏名] Like '*" & Me![カナ氏名] & "*'"
でしょうか?

投稿日時 - 2009-09-07 14:37:17

お礼

ありがとうございました!
無事動きました。

投稿日時 - 2009-09-07 16:41:10

ANo.2

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問