入力フォームから複数のテーブルへレコードの保存

Question

入力フォームを作成しデータを入力したいのですが、保存したいテーブルが項目により別テーブルになっています。

サブフォームで試してみたのですが、3つ以上だとサブフォームを作成できません。

またコマンドボタンで別のフォームを開いて保存させる方法も考えてみたのですが、

リレーションで結んであるデータも都度入力しなくてはならない（フォーム変更ごとにＩＤを入力が必要）ので入力者には手間になってしまいます。

一度入力したものは引き継がれるような方法はありますか。よろしくお願いします。

テーブル

患者情報テーブル                   病棟Ａテーブル　　　　　病棟Ｂテーブル　　　病棟Ｃテーブル

　　　ＩＤ　　　　　　　　　　　　　　　病棟Ａコード　　　　　　　 病棟Ｂコード　　　　　病棟Ｃコード

　　　氏名　　　　　　　　　　　　　　ＩＤ　　　　　　　　　　　　　ＩＤ　　　　　　　　　　　　ＩＤ

　　ふりがな　　　　　　　　　　　病棟Ａ入院日　　　　　　　病棟Ｂ入院日　　　　病棟Ｃ入院日　　　　

　　　生年月日　　　　　　　　　　病棟Ａ退院日　　　　　　病棟Ｂ退院日　　　　病棟Ｃ退院日　　　　　　　　

　　　診療科　　　　　　　　　　　　Ａ部屋番号　　　　　　　　Ｂ部屋番号　　　　　Ｃ部屋番号

　　　担当医

入力フォームＡ

   　　ＩＤ　　　　　　　　　　　　　　　

　　　氏名　　　　　　　　　　　　　　　　　

　　　ふりがな　　　　　　　　　　

　　　生年月日　

　　　診療科　　　

　　　担当医

　　　コマンドボタン

　　　　　病棟Ａへ入院　→　ＩＤ（入力フォームＡを引き継ぎたい）、病棟Ａ入院日、病棟Ａ退院日、病棟Ａ部屋番号

　　　　　病棟Ｂへ入院　→　ＩＤ（入力フォームＡを引き継ぎたい）、病棟Ｂ入院日、病棟Ｂ退院日、病棟Ｂ部屋番号

　　　　　病棟Ｃへ入院　→　ＩＤ（入力フォームＡを引き継ぎたい）、病棟Ｃ入院日、病棟Ｃ退院日、病棟Ｃ部屋番号

※入院パターン例

　　　　・病棟Ａに入院して、退院してすぐ病棟Ｂへ入院、退院後　Ｃ病棟

　　　　・病棟Ｃに入院して、退院後病棟Ａへ入院

　　　　・同一ＩＤ患者が11月1日から11月30日入退院後、12月10日にまた入院

　パターンがさまざまあるので、入院ごとにまとめることができますか。

Answer 1

みなさん、こんにちは。

MukkuMuku さん、ずっち さん、いつもコメントありがとうございます。

dhp615 さん、マイクロソフト コミュニティ への投稿ありがとうございます。

次のような手順でやると、サブフォームのソース オブジェクトを切り替えられると思いますよ。

参考にしているページ の内容を補足できているといいのですが。。。

・ 「オプション グループ 」 (名前 : OptionGroup) を配置してから、「オプション グループ」 の枠の中にオプションボタンを配置します。

・ 配置したオプション ボタンの 「オプション値」 をそれぞれ設定します (今回は 1 ～ 3 としています)

・ サブ フォームを配置して (名前 : SubForm)、「ソースオブジェクト」 に 「病棟Aテーブル」 を指定

(こちらで使ったテーブルの内容は、気にしないでください)

・ 「オプション グループ」 のイベント の 「更新後処理」 に次の内容を記述します

Answer 2

こんばんは、ずっちです。

MukkuMukuさんが提案されているテーブルの統合はしないんですね。

私もテーブルは統合した方がすんなりいけると思うんですが…

ちなみに、オプション値は「オプションボタン」単品では存在せず、

「オプショングループ」ってコントロールで作ったときのみ存在します。

それで作れば後はそのHPのとおりいけると思いますよ。

Answer 3

MukkuMukuです、こんばんは。寒くなってまいりました。

ぱっと見なんですが、病棟テーブルがひとつになったほうが自然かなと思いました。

一人の患者さんが同時に別の病棟に入院するということがないと思えばなおさら。

たぶん他の処理とかでもひと手間かけていかないとならないような気がします。

入力ォームに各病棟テーブルに連結したサブフォームがあったとして、サブフォームの

ソースオブジェクトを切り替えていけばなんとかできそうな。

その時患者さんの入院履歴というか入力された情報みたいなものが見えてないと入力

する人にとって優しくないかなと。

Answer 4

MukkuMuku さん、ずっち さん、楠部　啓さん返信ありがとうございます。

オプショングループがないとオプション値が設定できないのですね。

参考になりました。

みなさんからアドバイスいただいたように病棟のテーブルをひとつにまとめて作成しようと思います。

Answer 5

MukkuMukuさん　お世話になります。

”サブフォームのソースオブジェクトを切り替え方法”なのですが、調べてみたのですがオプション値という設定がaccess2010では見当たらなく、私ではうまくできませんでした。

参考（http://www.accessclub.jp/samplefile/samplefile_117.htm）

もしよろしければ、access2010での”サブフォームのソースオブジェクトを切り替え方法”を教えていただけないでしょうか。

よろしくお願いします。