ACCESS VBAにてDlookupとDmin
質問させてください。
ACCESSで通信販売のための商品管理と発送システムを作り運用しております。
今回梱包作業を少しでも簡素化するためにデータベースに登録されている商品サイズをもとに梱包用の段ボールの種類を自動で取得したいと思っております。
段ボールなどの種類は15種類ほど使用しており、現状その都度商品にフィットするものを探して作業しております。
現在のACCESSの内容は以下の内容です(説明しやすいように必要な部分のみ記載しております。)
【T商品】
ID
商品名
SizeW
SizeD
SizeH
その他価格情報や在庫状況など
【T梱包材マスター】
ID
梱包材名(当社での呼び名)
内寸1
内寸2
内寸3
内寸三辺合計(上記1-3の合計の集計フィールド)
梱包材重量
今回、フォーム上で商品の三辺のサイズを入力後に商品サイズのすべての辺より大きく、なおかつ一番軽いの梱包材を取得したいと考えています。
要するに商品を梱包できる箱で一番軽おい箱を自動で取得するということです。
T商品のW>D>H
T梱包材マスターの内寸1>内寸2>内寸3
と実際の縦横高さとは無関係にサイズが大きい順に入力はされています。
T商品をデータソースにしたフォームではルックアップで表示もしますので、T梱包材マスターのIDで取得したいと思います。
DMinとDlooupの組み合わせかな?と思うのですが。。。
DMin("梱包材ID", "T梱包材マスター", "内寸1 >" & Me.W & " And " & "内寸2 >" & Me.D & " And " & "内寸3 >" & Me.H)
例えばこんな感じですとすべてのサイズをクリアしたIDの一番小さいもの(一番登録の早いもの)というものになってしまうと思うのですが、条件やDMinで取得するとしたらどのようなVBAになるのでしょうか?
よろしくお願いします。
お礼
作業シロがどの程度必要なのかがわからないんですよね。 フォークの上手い下手で必要量は変わるのでしょうかね? それと入り口とかフォークリフト自身の幅とかでまっすぐ入れられなかったり、傾かざるを得ない場合があるでしょうから。 業者さんに聞く時間も出来たので、相談してから設計したいと思います。 ご回答ありがとうございました。