将MS Access中的每个新年的计数器ID重置为1

时间:2014-01-16 14:49:01

标签: vba ms-access access-vba ms-access-2010

我有两个表,tblContactstblTrackJob。每次要在tblContacts中添加新记录时,ID都会将其JobNo字段分配给ID中存储的tblTrackJob的值。我喜欢每年重置为1的值。

例如......

 first name, last name, JobNo, dateEntered
 bob         smith       01    1/1/2013
 john        doe         02    1/2/2013
 mary        Thomas      03    1/3/2013

 Joe         Henry       01    1/1/2014 

1 个答案:

答案 0 :(得分:3)

由于我们正在处理Access 2010,我们可以为[tblContacts]表创建Before Change data macro以分配[JobNo]值:

BeforeChange.png

宏将从具有相应Year([dateEntered])的记录中找到表中最大的[JobNo],然后将1添加到该值以为新记录提供[JobNo]。如果没有找到相应年份的现有记录,则新记录的[JobNo]等于1。