|
>Me![提案日] = Format(提案日, "yymm") & Format([連番] + 1, "000")
これは打ち込んだものと同一でしょうか。
もしそうなら、Me![提案日] は Me![提出月] が正しいのではないでしょうか。
あと、Format([連番] + 1, "000") とありますが、[連番]は何を指しているのでしょうか。
この書き方だと、フォーム中のテキストボックスか何かに「連番」という名前のものがあり、そのデータを拾うことになりますよ。前に示した
連番 = DCount(...
で取得した連番を意味するのであれば、[ ]はつけてはいけません。
それと、勿論このコード中で、連番を先に取得しておく必要があります。流れとしては、 連番取得 → 提出月のテキストボックスに入力 となりますので。
>クエリで入力するとできてはいるのですが
今回私が提示した方法では、クエリは必要ありませんよ。(使ったらダメなわけではないですが)
提出月のテキストボックスに、手動で連番を数えて入力する代わりにVBAで入力しているという状態なので、クエリによる計算は不要です。
>これは、亀マスター さんが前回の回答にも書かれたように、
>『連番を計算・表示させる前に、更新前の日付を調べ、更新前が空白・同じ月・異なる月などの場合分けで対応する必要があるでしょう。』
>に関係があるのでしょうか?
入力日がバラバラで、一度入力したら変更することがないとのことですので、それなら問題はありません。
頑張ってくださいね。
|
|