Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


108 / 9985 ←次へ | 前へ→

【13067】Re:日付+自動採番
質問  NUTKEY  - 16/9/16(金) 15:12 -

引用なし
パスワード
   亀マスター さん

連絡が遅くなりすいませんでした。

「使用可能」「編集ロック」は実施しました。

日付順に関しては入力日がバラバラなので問題なしです。

また、入力済みの提案日を編集することはないので問題なしです。


Private Sub 提案日_AfterUpdate()
  
Me![提案日] = Format(提案日, "yymm") & Format([連番] + 1, "000")
 
End Sub

と入れたのですがデバックが出てしまいます。

これでは条件がまずいのでしょうか?

そして、連番になってくれません・・・

クエリで入力するとできてはいるのですが、閉じてまた開くと連番ではなくなっています。
これは、亀マスター さんが前回の回答にも書かれたように、
『連番を計算・表示させる前に、更新前の日付を調べ、更新前が空白・同じ月・異なる月などの場合分けで対応する必要があるでしょう。』
に関係があるのでしょうか?


お手数ですが再度教えて下さい。

69 hits

【13063】日付+自動採番 NUTKEY 16/9/8(木) 12:32 質問[未読]
【13064】Re:日付+自動採番 亀マスター 16/9/11(日) 2:02 回答[未読]
【13065】Re:日付+自動採番 NUTKEY 16/9/12(月) 9:28 質問[未読]
【13066】Re:日付+自動採番 亀マスター 16/9/12(月) 22:31 回答[未読]
【13067】Re:日付+自動採番 NUTKEY 16/9/16(金) 15:12 質問[未読]
【13068】Re:日付+自動採番 亀マスター 16/9/17(土) 18:08 回答[未読]
【13069】日付+自動採番 NUTKEY 16/9/19(月) 14:03 お礼[未読]

108 / 9985 ←次へ | 前へ→
ページ:  ┃  記事番号:
975301
(SS)C-BOARD v3.8 is Free