1
会計年度に基づいてレコード番号を生成するためのマクロを作成する方法を教えてください。 （アクセス2013）
会計年度に基づいて自動的に進むレコード番号を作成したいのですが。 2016001、2016002など 次の式に基づいて、[Projects]テーブルに[FiscalYr]フィールド（計算データ型）が既にあります。 IIf(Month([EntryDate])>=10,Year([EntryDate])+1,Year([EntryDate])). [EntryDate]フィールドはDate / Timeフィールドで、デフォルト値はDate（）です。これは私が望むように働いています。 その[FiscalYr]番号を取得して、001から始まり3つ前のレコードに基づいて1ずつ増加する3桁の番号の前に付けることができます。新しい年度ごとに？私たちの会計年度は10月1日に始まり、9月30日に終わります。 テーブル[プロジェクト]とフォーム[プロジェクトフォーム]のどちらに情報が入力されていても番号を生成したいのですが。情報がフォームに入力された場合にのみ生成されるのではありません。私は、変更前マクロを使用するのが最善の方法であることを示唆するいくつかの投稿をオンラインで見ました。日付の問題が整理された（私は思う）。 既存の[FiscalYr]フィールドを操作するよりも簡単であれば、[EntryDate]からFiscal Yearを作成し、同時に数値を作成するマクロを使用しても問題ありません。私はただのAccessユーザーなので、ちょっとしたことを言っているのであれば申し訳ありません。危険であることを知っていると思います。 どうもありがとう、 アンドレア 更新2015/12/9： 私はマクロの考えをあきらめました。 Scottgemのブログのヒントを使う（ https://scottgem.wordpress.com/2009/11/25/sequential-numbering/ ）、連番のシステムを稼働させることはできましたが、新しい会計年度の初めに番号を1にリセットすることにはまだ苦労しています。私の会計年度の値をどのように生成しているのか、それともまったく別の問題なのかが問題ではないかどうかわかりません。 これが私が持っているものです： テーブル名：プロジェクト プロジェクト内で、私はこの問題に関連して以下の分野を持っています： ProjectNo：number - 長整数 シーケンス：数値 - 長整数 EntryFiscalYr：算出 - 長整数。式は次のようになります。 IIf(Month([EntryDate])>=10,Year([EntryDate])+1,Year([EntryDate])) EntryDate：日付/時刻。デフォルト値：Date（） フォーム名：プロジェクトフォーム 私のプロジェクトフォームには、以下のコントロールがあります。 シーケンス：テキストボックス、コントロールソースはプロジェクトテーブルのシーケンスフィールド、非表示に設定 CreateProjNo：ボタン、クリックしたときのイベント： Private Sub CreateProjNo_Click() Me.Sequence = Nz(DMax("[Sequence]", "Projects"), 0) + 1 DoCmd.RunCommand acCmdSaveRecord End Sub …