Q&A
サブフォームのレコードソースのSQLをコピペして、質問文に追記できますか？
実現したいこと
簡単な会計の仕訳伝票入力画面をACCESSで作成しています。
親フォームの仕訳伝票IDでサブフォームと紐づけて、サブフォームにレコードの明細を入力、表示させます。
そのサブフォームのレコードを入力順に表示させたいため、
「並び順」というフィールドを設定し、
「借方科目名」「借方金額」「貸方科目名」「貸方金額」「摘要」のそれぞれのフィールドの更新後処理として
Me!並び順 = Me.CurrentRecord
という一文を設定しています。
これで並び順フィールドに、1.2.3 とレコード番号が設定されるのですが、
保存すると、並び順が変わってしまいます。
サブフォームのレコードソースは「並び順」フィールドの昇順設定をしているので、並び順が変わってしまうはずは
ないのですが。。。
また厄介なことに、並び順が変わってしまう場合や変わらない場合もあって、どういう場合に変わるのか、というような
法則が発見できません。
並び順が変わってしまう場合のスクリーンショット
並び順が変わらない場合のスクリーンショット
※「借方科目名」「借方金額」「貸方科目名」「貸方金額」「摘要」 はどこか一つでも入力されていればレコードしてOK、
という考えで運用を行います。
よろしくお願いします。
---追加---
サブフォームのレコードソースは以下の通りです(ACCESSなのでクエリをそのままSQL文で書きます)
SELECT T_仕訳明細.並び順, T_仕訳明細.ID, T_仕訳明細.仕訳ID, T_仕訳明細.借方科目名, T_仕訳明細.借方金額, T_仕訳明細.貸方科目名, T_仕訳明細.貸方金額, T_仕訳明細.摘要 FROM T_仕訳明細
ORDER BY T_仕訳明細.並び順;
logres_Fanさん 質問に追記しました。
拝見しましたが、当てが外れました。ちょっとよくわかりませんね。あとは、下記設定があれば削除してみるとか。
フォームでのレコードの並べ替え（プロパティシートで設定）
https://hamachan.info/win10-and-office2016/aform/
logers_Fanさん このサイトのように [Q_仕訳明細].[並び順] と設定したら、思うように昇順に並びました！ ありがとうございます。 ただ、クエリで設定しているんですけどね。。。フォームのプロパティが優先されるのかもしれないですが。
うーん、Hatenaさんの回答待ちですね。
新しいフォームに順次トレースしてどのタイミングで再現するか、再現しなければ置き換える、これがベターですかね。
回答1件
0
ベストアンサー
Form.CurrentRecord プロパティ (Access)
設定値は、フォームに表示されているカレント レコードの番号を表す長整数型 ( Long Integer ) の値です。
表示する度に変わる値ですから、並び順に使用するのは無理があります。
明細の追加順にしたいのなら、オートナンバーを利用するか、独自に連番を振る事になるかと思います。
投稿2023/04/24 04:04
総合スコア25426
回答ありがとうございます。ただ、Me!並び順 = Me.CurrentRecord として、レコードを保存しているのですから、その保存された数値を基に昇順に表示されるはず、と思うのですが。。。(一旦保存されたあとに、再び Me!並び順 = Me.CurrentRecord の処理が行われる処理をしていないですし。。。) 私の理解が、何か違いますでしょうか？
リファレンスには、
> このプロパティの値は、フォームの左下のレコード番号ボックスに表示される値に対応します。
とあります。
同じ値が設定されたりしていないか意図通りの順番の値かどうかを、保存された値を確認してみて下さい。
並び順が意図通りでないなら意図通りでない値が保存されているはずです。
saziさん ありがとうございます。 確認しました。 レコードもやはり「並び順が変わってしまう場合のスクリーンショット」と同じ状態で保存されています。。。 これで昇順にならないなら、別な方法を考えます。
Accessの付けた順序を利用するなら、全件更新するなら値は担保されると思いますが、常に表示分を全件更新すると考えた方が良いでしょう。
再表示された場合も含めて更新するとなると該当するイベントは無かったのではないかと思います。
あなたの回答
tips
プレビュー
