请教老问题，确实不懂这个编码规律，请回复，谢谢！

ha0148

ly

1、1-4位是编码前缀，固定格式。
2、5-10位是年月，也是判断每个月重新编号的依据。格式是：Format(Date(),"yyyymm")
3、所以取日期就应该从第5位开始，年月的长度是6：Mid(单号,5,6)
4、DMax()中的条件判断提取的日期是否与当前日期匹配，从而确定编号+1，或从1开始。

roych

论坛里有那么好的模块都不用么？http://www.office-cn.net/thread-114014-1-1.html前面那位大神已经讲得很清楚了，我这里就不多说了。如果前缀不固定的话，就需要随时更新mid部分的起始位置。需要先用instr去查找日期的位置。