Accessで作る見積書~15商品フォームの値を見積明細へ転記

Pocket

商品フォームを開き、商品を選択したときの動作の設定をします。
2603041
商品フォームをデザインビューで開き、コマンドボタンのプロパティ→イベントタブ→クリック時
を選択し、次のVBAコードを入力します。

2603042
Forms!見積書メイン.見積明細!商品CD = Me!商品CD →商品フォームの商品CDを見積明細の商品CDに転記
Forms!見積書メイン.見積明細!単価 = Me!単価  →商品フォームの単価を見積明細の単価に転記
サブフォームに転記する場合は、
[メインフォーム].[サブフォーム]というように「.」で繋げます。

単価は見積明細テーブルと商品テーブルの両方にフィールドがあります。
見積明細フォームも商品テーブルの単価を参照するやり方もありますが、そうすると単価を変更すると
過去のデータまで全て単価が変わってしまうので、今後変更する可能性がるフィールドについては、
別のフィールドを用意する必要があります。

実行結果です。
2603043

先日地元の静岡マラソンを走ってきました。
やっと念願のサブ3.5達成です!