アクセスでフリガナ検索をしたいのですが

質問

フリガナが濁点の場合はどうやって検索したらよいのでしょうか？

※状況※
従業員名簿があります。
名前・フリガナ・住所です。
【た】というコマンドを作成しました。
このコマンドを押す事によってフリガナが【タ】【ダ】で始まる人のみ表示
をさせたいのです。

回答No.2

noname#22222 · ベストアンサー

＜住所録＞
ID　　名前　　ふりがな
1　　　田中　　タナカ
2　　　山中　　ヤマナカ
3　　　大和　　ダイワ

Private Sub コマンド0_Click()
　　Me.リスト1.RowSource = "SELECT ID, 名前 FROM 住所録 WHERE ふりがな LIKE '" & Me.読み先頭 & "*'"
　　Me.リスト1.Requery
End Sub

タだけで始まる検索ですとこれでOKです。
が、タとダを検索させるには、少し、工夫が必要です。

Private Sub コマンド0_Click()
　　Me.リスト1.RowSource = "SELECT ID, 名前 FROM 住所録 WHERE ふりがな LIKE '[タダ]*'"
　　Me.リスト1.Requery
End Sub

と、<タ>を<[タダ]>に置換する必要があります。

Private Sub コマンド0_Click()
　　Me.読み先頭 = Replace(Me.読み先頭, "カ", "[カガ]")
　　Me.読み先頭 = Replace(Me.読み先頭, "タ", "[タダ]")
　　Me.リスト1.RowSource = "SELECT ID, 名前 FROM 住所録 WHERE ふりがな LIKE '" & Me.読み先頭 & "*'"
　　Me.リスト1.Requery
End Sub

こんな感じで目的は達成できると思います。

お礼

きちんと理解はできませんでしたが、言ってることはわかりました。

長々と丁寧・詳細に教えていただきありがとうございました。

回答No.1

bonaron

どういう方法で検索しているか不明ですが、
例えばフィルタなら
　Me.Filter="フリガナ Like '[タダ]*'"
とか。

補足

アクセス初心者の為フィルタで検索してました。
難しい言語とかさっぱりわからないもので・・・

上記の要領でやってできました。

ありがとうございます★☆