【MS access】DLOOKUP関数のフィールド名(expr)を変数にしたいんです！

Question

久しぶりに質問させていただきます。

AccessのDLOOKUP関数についてです。

DLookup( expr, domain [, criteria] )
↑[expr]の部分を変数にして、都度フィールド名を変更したいのですが、うまくできません。

対象テーブルのフィールド名は
0人｜1人｜2人｜3人|4人・・・
と、人数が並んでいるだけです。
取得した数値によって指定するフィールドを変えたいと思っています。

Dim ID As Integer , Kekka As Integer , strMan As String

ID = Forms!フォーム名!コントロール名

strMan = ID & "人"

Kekka = Dlookup( strMan , テーブル名 , 条件)

"人"がダメなのかもと思い、フィールド名を数字だけにしてみましたが、結果は同じでした。

よろしくお願いいたします。

Answer 1

数字で始まるフィールド名は[]で囲む必要があります。

trMan = "[" ID & "人]"

Kekka = Dlookup( strMan , テーブル名 , 条件)

いろいろトラベルトラブルの原因になりかねませんので、可能ならフィールド名の変更をお勧めします。
その際は下記もご参考に。

Access データベースでの作業時に使用すべきでない特殊文字

Comments

[version-l]

hatena19 様

[]で囲んだら見事に実行できましたw

まさか文字が原因だったとは・・・

たまにデータが変になったりする事があったのですが、
今後はこの視点からも検証することが可能になりました。

良い勉強させていただきました。
本当にありがとうございます！