いつもお世話になっています。
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で質問しましょう!
似たような質問が見つかりました
- その他(データベース) 伝票番号、品番、在庫としてマクロでもAccessでもデータ表を作りたいのですが、ご指導お願いします 1 2022/11/13 23:48
- メルカリ らくらくメルカリ便でクロネコヤマトを使って商品を送ってもらいましたが数日経っても伝票未登録のままです 1 2022/09/29 19:56
- 運輸業・郵便業 【至急】 国際便のインボイスについて、伝票番号が空欄なのですが、伝票はヤマト運輸さんのサイトを見て自 2 2023/03/16 14:41
- Visual Basic(VBA) EXCEL関数LOOKUPとFILTERについての質問です 1 2022/12/21 05:53
- Java Java 配列<選挙> 4 2023/07/31 15:07
- 会計ソフト・業務用ソフト VBA 記録簿の行間を空けないコードを教えて欲しい。 5 2023/07/10 19:29
- 郵便・宅配 ゆうパック。追跡番号だけで、着払いか?、元払いか?を判定することはできる? 1 2022/07/02 14:05
- 郵便・宅配 ファミリーマートのバイトしてるものです。郵便物の伝票にお客様の電話番号が書いてなかった場合もしそれで 5 2022/05/31 05:06
- メルカリ メルカリで、らくらくメルカリ便のネコポスでコンビニで発送しました。 昨日夕方18時くらいに発送しまし 4 2023/07/27 07:14
- 運輸業・郵便業 クロネコヤマト宅急便で荷物を取りに来てくれる電話番号は何のですか後伝票を書いてくれる番号は何時にかけ 2 2022/04/27 21:11
このQ&Aを見た人はこんなQ&Aも見ています
-
とっておきの「夜食」教えて下さい
真夜中に小腹がすいたときにこっそり作るメニュー、こっそり家を抜け出して食べに行くお店… 人には言えない、けど自慢したい、そんなあなたの「とっておきの夜食」を教えて下さい。
-
「平成」を感じるもの
「昭和レトロ」に続いて「平成レトロ」なる言葉が流行しています。 皆さんはどのようなモノ・コトに「平成」を感じますか?
-
「覚え間違い」を教えてください!
私はかなり長いこと「大団円」ということばを、たくさんの団員が祝ってくれるイメージで「大円団」だと間違えて覚えていました。
-
2024年のうちにやっておきたいこと、ここで宣言しませんか?
2024年も残すところ50日を切りましたね。 ことしはどんな1年でしたか? 2024年のうちにやっておきたいこと、 よかったらここで宣言していってください!
-
好きな和訳タイトルを教えてください
洋書・洋画の素敵な和訳タイトルをたくさん知りたいです!【例】 『Wuthering Heights』→『嵐が丘』
-
Accessのフォーム上にレコード数とレコード番号の表示
その他(データベース)
-
accessでオートナンバーを使わずに「文字+数字」の自動採番する方法
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・【大喜利】【投稿~11/22】このサンタクロースは偽物だと気付いた理由とは?
- ・お風呂の温度、何℃にしてますか?
- ・とっておきの「まかない飯」を教えて下さい!
- ・2024年のうちにやっておきたいこと、ここで宣言しませんか?
- ・いけず言葉しりとり
- ・土曜の昼、学校帰りの昼メシの思い出
- ・忘れられない激○○料理
- ・あなたにとってのゴールデンタイムはいつですか?
- ・とっておきの「夜食」教えて下さい
- ・これまでで一番「情けなかったとき」はいつですか?
- ・プリン+醤油=ウニみたいな組み合わせメニューを教えて!
- ・タイムマシーンがあったら、過去と未来どちらに行く?
- ・遅刻の「言い訳」選手権
- ・好きな和訳タイトルを教えてください
- ・うちのカレーにはこれが入ってる!って食材ありますか?
- ・おすすめのモーニング・朝食メニューを教えて!
- ・「覚え間違い」を教えてください!
- ・とっておきの手土産を教えて
- ・「平成」を感じるもの
- ・秘密基地、どこに作った?
- ・【お題】NEW演歌
- ・カンパ〜イ!←最初の1杯目、なに頼む?
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessで別テーブルの値をフォ...
-
最新の日付とその金額をクエリ...
-
access 自動採番 年が変わる...
-
条件をつけて日付の古い行を抜...
-
【アクセスVBA】テーブルにフィ...
-
Access:抽出して、色をつけたい。
-
[Access]異なるレコード間の文...
-
質問です。 下記のテーブルとデ...
-
vba 直前の操作はキャンセルさ...
-
Accessでのレコード存在チェック
-
Access 文字+年ごとの自動採番
-
Oracleでの文字列連結サイズの上限
-
GROUP BYを行った後に結合した...
-
SELECTで1件のみ取得するには?
-
SELECTの結果で同一行を複数回...
-
固定値を含む結合と複数テーブ...
-
GROUP BYを使ったSELECT文の総...
-
select insertで複数テーブルか...
-
Excelでセルの書式設定を使用し...
-
ADO VBA 実行時エラー3021
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessで別テーブルの値をフォ...
-
最新の日付とその金額をクエリ...
-
access 自動採番 年が変わる...
-
Accessでのレコード存在チェック
-
【アクセスVBA】テーブルにフィ...
-
[Access]異なるレコード間の文...
-
Accessで日付が変わると番号が...
-
アクセスで「空き番」の確認
-
サイベースには、オラクルのROW...
-
【Access】選択クエリのグルー...
-
Access:抽出して、色をつけたい。
-
条件をつけて日付の古い行を抜...
-
Access 文字+年ごとの自動採番
-
access 自動採番 「10-AA-000...
-
vba 直前の操作はキャンセルさ...
-
【SQL】existsでの商演算
-
access 請求番号の自動採番
-
Recordset.FindFirstについて
-
MySQLで桁あふれを防ぐ方法
-
ACCESSでの行番号の自動採番
おすすめ情報