Accessでの抽出で完全一致。

あいまい抽出で下記のような記述を、
完全一致に変更する場合どのように書き換えればいいでしょうか？
以前覚えたのですが、本を手放してしまい忘れてしまいました。
ご指導お願いします。

Private Sub 技術コードで抽出_Click()

Dim ipt As String
ipt = [技術コード]
DoCmd.ApplyFilter , "[担当者コード] Like '*" & ipt & "*'"

End Sub

No.3 ベストアンサー 回答者： ta123 回答日時： 2004/10/22 18:25

私はＡｃｃｅｓｓのＶＢＡを知りませんが、ＳＱＬ文から想像するに以下のようになるのでは。

DoCmd.ApplyFilter , "[担当者コード] =" & ipt

Likeはあいまい検索用に使うものです。

この回答へのお礼

貴方様のアドバイスを活用させて頂きました。
LIKEがあいまい検索だと言う事は分かっていたのですが、
完全一致の記述を忘れていました。
単純明快で分かりやすい回答でした。

お礼日時：2004/10/25 09:02

No.5 回答者： Gin_F 回答日時： 2004/10/23 02:18

本来の質問に対する回答は、すでにでていますのでそちらはいいとして。

。

ApplyFilter メソッドを使うより、
Form の
　Filter プロパティ
　FilterOn プロパティ

を使ったほうが、安定性・その他の面でおすすめです。

この回答へのお礼

会社が大変な事になってしまいのんびりこちらを見ている時間がありませんでした。
返事がだせずじまいで大変申し訳御座いませんでした。
結果としては違う方のアドバイスを採用させて頂いています。

お礼日時：2004/12/30 06:31

No.4 回答者： O_cyan 回答日時： 2004/10/22 18:35

DoCmd.ApplyFilter ,"技術コード = '[担当者コード] & ipt'" ,acFilterNormal

で良いのではないでしょうか

この回答へのお礼

多数のアドバイスありがとうございます。
皆様のアドバイス全てお役にたったのですが、
今回はNo.3さんの回答を採用させていただきました。

お礼日時：2004/10/25 09:03

No.2 回答者： mshr1962 回答日時： 2004/10/22 18:23

Likeはあいまい検索です。

一致でいいなら
DoCmd.ApplyFilter , "[担当者コード] ='" & ipt & "'

この回答へのお礼

多数のアドバイスありがとうございます。
皆様のアドバイス全てお役にたったのですが、
今回はNo.3さんの回答を採用させていただきました。

お礼日時：2004/10/25 09:00

No.1 回答者： noname#21585 回答日時： 2004/10/22 17:54

アスタリスクを取ればいいのではないでしょうか。

DoCmd.ApplyFilter , "[担当者コード] Like '*" & ipt & "*'"

を

DoCmd.ApplyFilter , "[担当者コード] Like ipt

この回答へのお礼

多数のアドバイスありがとうございます。
皆様のアドバイス全てお役にたったのですが、
今回はNo.3さんの回答を採用させていただきました。

お礼日時：2004/10/25 08:59