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

解決済みの質問

Access Dlookup関数について

Dlookupで悩んでいます。
ExcelのVlookと違い、“数字”のコードでなければ引っ張ってこれないのでしょうか?
以下、がその内容です。
「T_得意先マスタ」の得意先コードフィールドに aaa というコードがあり、得意先名フィールドに ○○商事 とあります。
どうやってもできないのです。
なぜか、aaa ではなく、数字(例. 123)にすると出ます。
教えてください。

Private Sub 得意先コード_AfterUpdate()
Dim a As Variant, b As String
b = "得意先コード = " & Me![得意先コード]
a = DLookup("得意先名", "T_得意先マスタ", b)
If IsNull(a) = True Then
Me.テキスト1.Value = "該当がありません。": Me![得意先コード] = Null
Else
Me.テキスト1.Value = a
End If
End Sub

投稿日時 - 2009-09-08 00:55:49

QNo.5271738

困ってます

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

つまり得意先コードというのはテキスト型なのでしょうか。
そうであれば、

b = "得意先コード = '" & Me![得意先コード] & "'"

として試してみてください。
Where条件で、テキスト型の定数はアポストロフィ(')で囲みます。

投稿日時 - 2009-09-08 02:14:25

お礼

できました!
すごいです!
感謝しています!!
ありがとうございました。

投稿日時 - 2009-09-08 22:52:03

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

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

回答(1)

あなたにオススメの質問