
いつもお世話になっています。
MSACCESSで、以下のようなしくみを作ろうとしています。
(例)
親テーブル 伝票番号(オートナンバー) 担当番号、販売先番号・・・・
子テーブル 伝票番号(オートナンバー) 行番号、商品番号・・・・
(やりたい事)
項目"伝票番号"はリンクさせて同じ値とする。
項目"行番号"は親レコードの値が増えるたびに1から増加させていくようにしたい。
伝票番号 1 行番号 1
伝票番号 2 行番号 1
伝票番号 2 行番号 2
伝票番号 2 行番号 3
伝票番号 3 行番号 1
のように。
なにぶん初心者なものでマニュアル等調べて見ましたがうまくいきません。よろしくお願いします。
No.2ベストアンサー
- 回答日時:
>項目"伝票番号"はリンクさせて同じ値とする。
こうするためには子テーブルのほうにはオートナンバーは使えません
自動的に同じにしたければ、入力インタフェースにメイン・サブのフォームを使います
>項目"行番号"は親レコードの値が増えるたびに1から増加させていくようにしたい。
こうしたければ行番号にもオートナンバーは使えません
サブフォームの伝票番号、行番号以外の必須入力フィールド(たとえば商品番号)の
更新後イベントに番号を算出して代入するようなコードを書いてやることになります
Private Sub 商品番号_AfterUpdate()
If Me.NewRecord Then
Me.行番号 = Nz(DMax("行番号", "子テーブル", "伝票番号=" & 伝票番号), 0) + 1
End If
End Sub
No.1
- 回答日時:
最初に・・・
> 親テーブル 伝票番号(オートナンバー) 担当番号、販売先番号・・・・
> 子テーブル 伝票番号(オートナンバー) 行番号、商品番号・・・・
のテーブルで
親テーブル 受付順(オートナンバー) ・・・
子テーブル 親受付順(長整数)、子受付順(オートナンバー)・・・
として、クエリー上に
伝票番号: DCount("*","親テーブル","受付順 <= " & [親テーブル]![受付順])
行番号: DCount("*","子テーブル","親受付順 = " & [子テーブル]![親受付順] & " And 子受付順 <= " & [子テーブル]![子受付順])
と、すれば・・・番号は、振れます
オートナンバーで欠番が出ると再度振りなおすと言う手間は無くなるので希望と若干違うような気がしますが・・・
これは、テストとかで順番を振るサンプルでよく使う手法ですが、こう言う、番号を振るにも使える手法です
この回答への補足
ご回答ありがとうございます。返答が遅れてすみません。
早速試してみたのですが、うまく動いてくれません。
ちなみに、項目名は受付順・親受付順・子受付順とされておりますが、
これは伝票番号、行番号の代わりに用いるという事でしょうか?
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
最新の日付とその金額をクエリ...
-
Accessで別テーブルの値をフォ...
-
【SQL】existsでの商演算
-
MS Accessで行指定検索の方法
-
MS Accessの抽出方法につ...
-
vba 直前の操作はキャンセルさ...
-
Oracle 8i に入っている値が、...
-
Accessで日付が変わると番号が...
-
アクセスで「空き番」の確認
-
アクセスで挿入時のVALUES以下...
-
GROUP BYを行った後に結合した...
-
OracleのSQL*PLUSで、デー...
-
Oracleでの文字列連結サイズの上限
-
Excelでセルの書式設定を使用し...
-
DataGridViewの、選択されてい...
-
select insertで複数テーブルか...
-
SELECTで1件のみ取得するには?
-
日付データの抽出方法を教えて...
-
range表記をcells表記にしたい
-
MERGE文を単体テーブルに対して...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessで別テーブルの値をフォ...
-
最新の日付とその金額をクエリ...
-
【アクセスVBA】テーブルにフィ...
-
access 自動採番 年が変わる...
-
Accessで日付が変わると番号が...
-
Accessでのレコード存在チェック
-
Recordset.FindFirstについて
-
vba 直前の操作はキャンセルさ...
-
access 自動採番 「10-AA-000...
-
Access 文字+年ごとの自動採番
-
アクセスで「空き番」の確認
-
[Access]異なるレコード間の文...
-
条件をつけて日付の古い行を抜...
-
【Access】選択クエリのグルー...
-
Access:抽出して、色をつけたい。
-
ACCESSでの行番号の自動採番
-
Access VBAで更新履歴を追いたい
-
sqlで質問です。 Aテーブルの登...
-
Oracle 8i に入っている値が、...
-
質問です。 下記のテーブルとデ...
おすすめ情報