Accessマクロで作る 受注管理「シート図番検索」フォームの作り方

シート受注の図番は、製品マスタで登録された規則性のある命名（材質・色調・硬度・厚み・サイズの組み合わせ）に沿っています。この規則性を活かし、5項目の絞り込み検索だけでお目当てのシート図番へ辿り着けるようにしたのが、シート類選択ポップアップです。受注新規登録ページ本体が長くなりすぎたため、この機能を独立したページとして切り出しました。

このページでは以下のことを解説しています。

• 材質・色調・硬度・厚み・サイズの5項目による絞り込みで、目的のシート図番を確実に発見（各コンボは独立して選択可能）
• シート図番の命名規則（接頭辞「KKR)-」）を活かした、対象データと工場を絞り込むベースクエリの設計
• ワンタッチで全条件をクリアして全件表示に戻せる再検索ボタン
• 呼び出し元（受注新規登録／仕入先発注成形課）に応じて転記先のフォーム・フィールドを自動で切り替える仕組み
• 候補が0件の場合は、そのシート図番がまだ製品マスタに未登録であることの判断材料にもなる設計
• 選んだシート図番と単価をワンクリックで呼び出し元フォームへ転記

シート類選択ポップアップの画面構成

絞り込み検索エリアの5つのコンボボックス（材質・色調・硬度・厚み・サイズ）と、検索結果を表示するサブフォームの2エリアで構成されています。上から順にコンボを選ぶたびに検索結果が絞り込まれ、目的のシート図番が見つかったら適用ボタンで呼び出し元のフォームへ転記します。

F20受注シート類選択フォーム　フォームビュー

F20受注シート類選択フォーム　デザインビュー

主な構成要素

「件数」コントロールのコントロールソースは=Format(DCount("*","Q20受注シート類選択サブ"),"#,###")で、検索結果サブフォームの元クエリを直接カウントしています。

シート図番の命名ルールの解説ページ

シート図番命名

Accessマクロで作る 製品マスタ「新規登録」フォームの作り方

製品マスタの新規登録は管理者のみが実行できます。基本情報・営業課情報・工程情報をこのフォームで一括登録し、関連する課のテーブルに図番IDを自動追加することで各課担当者が課別情報を登録するベースが完成します。仕入先製品マスタへの登録もこのフォ[…]

シート図番の命名規則（材質・色調・硬度・厚み・サイズの組み合わせ）自体は、製品マスタの新規登録ページで解説しています。この規則性があるからこそ、5項目の絞り込みだけで目的の図番に確実に辿り着けます。逆に絞り込んでも候補が出てこない場合は、そのシート図番自体が製品マスタにまだ登録されていないということなので、先に製品マスタへの登録が必要です。

シート類と入力値を2本のクエリで絞り込む検索設計

検索結果は、シート類と対象工場を絞り込むベースクエリと、フォームの入力値でさらに絞り込むクエリの2本に分けて構成しています。役割ごとにクエリを分けることで、それぞれの抽出条件がシンプルになり、後から見直しやすい作りになっています。

ベースクエリ（Q20受注シート類選択）でシート図番と対象工場を絞り込む

T10製品Mから、シート図番であることを示す接頭辞「KKR)-」（製品マスタ登録時の命名ルール）と、取引先コード（対象工場）で対象データを絞り込みます。

Q20受注シート類選択クエリ　デザインビュー

フィールド構成

絞り込みクエリ（Q20受注シート類選択サブ）でフォームの入力値と連携する

ベースクエリの結果に対して、フォーム上の5つのコンボボックスの選択値をAND条件でさらに絞り込みます。

Q20受注シート類選択クエリ　デザインビュー（＞＞＞続く）

＞＞＞続き

フィールド構成

5つのコンボは連鎖的に選択肢を絞り込む作りではなく、それぞれ独立したコンボです。図番の文字列そのものに材質・色調・硬度・厚み・サイズの情報がすべて含まれているため、選んだ値をLike演算子でAND連結するだけで、複合条件による絞り込みが1つの抽出条件式で完結します。

正直に言うと：1本のクエリにすべての条件をAndで連結する方法でも実現できるはずですが、今回は2本に分けて組み立てています。1つのクエリに条件を詰め込みすぎると式が長大になり、後から見直すときの可読性が落ちてしまうため、「シート類と対象工場を絞り込む」「フォームの入力値で絞り込む」という役割ごとにクエリを分けました。同じ結果に辿り着く方法は複数ありますが、保守のしやすさを優先してこの形に落ち着いています。

参考までに、1本にまとめる場合は図番フィールドの抽出条件セルに以下のように条件をAndで連結する書き方になります。

Like "KKR)-*" And Like "*" & [Forms]![F20受注シート類選択]![材質] & "*" And Like "*" & [Forms]![F20受注シート類選択]![色調] & "*" And Like "*" & [Forms]![F20受注シート類選択]![硬度] & "*" And Like "*" & [Forms]![F20受注シート類選択]![厚み] & "*" And Like "*" & [Forms]![F20受注シート類選択]![サイズ] & "*"

シート類選択ポップアップを開くマクロ設計

このポップアップは受注新規登録フォームだけでなく、仕入先発注成形課フォームからも呼び出されます。呼び出し元によって転記先を切り替えるため、開く際に「選択」という制御用の値を渡しています。

サブマクロ：シート類選択（シート図番選択フォーム開く）

マクロの概要

マクロの設置場所

◆リンクカード：仕入先発注成形課フォーム設計（URL未定）

仕入先発注成形課フォームからこのポップアップを開く際は、選択コントロールに2を代入する専用のマクロが使われます。詳細は仕入先発注成形課ページで解説予定です。

再検索ボタンのマクロ設計

再検索ボタンは、5つの絞り込みコンボをすべてクリアし、検索結果を全件表示の状態に戻します。

サブマクロ：再検索

マクロの概要

マクロの設置場所

各コンボの更新後処理には、M99共通マクロの「再クエリ」を設定しています。コンボを選ぶたびにこのマクロが動き、絞り込みクエリの抽出条件（前述のLike連結式）が働いて検索結果サブフォームがその場で更新されます。

適用ボタンのマクロ設計（呼び出し元による転記先の分岐）

適用ボタンは、開いた時にセットされた「選択」の値（1または2）を見て、転記先のフォームとフィールドを切り替えます。

サブマクロ：シート類適用

マクロの概要

マクロの設置場所

まとめ

シート類選択ポップアップは、製品マスタで統一されたシート図番の命名規則を土台に、2段階のクエリ（対象データの絞り込み→コンボによるAND絞り込み）で検索を成立させています。呼び出し元ごとに転記先を切り替える「選択」フラグの仕組みにより、受注新規登録と仕入先発注成形課という異なる業務フローから同じポップアップを再利用できる設計です。