Foxtable(狐表)用户栏目专家坐堂 → 打印后自动生成单号


  共有3455人关注过本帖树形打印复制链接

主题:打印后自动生成单号

帅哥哟,离线,有人找我吗?
BATASC750206
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
打印后自动生成单号  发帖心情 Post By:2021/4/11 14:08:00 [只看该作者]

打印后如果自动生成送货单号,且送货单号会自动保存到表内相应的单元格内,如:每张送货单最多可以打印8行,请问这个代码要怎么写?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106076 积分:539479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/11 21:18:00 [只看该作者]

按什么规则生成什么样的送货单号?

 回到顶部
帅哥哟,离线,有人找我吗?
BATASC750206
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
  发帖心情 Post By:2021/4/12 11:32:00 [只看该作者]

两个字母+日期+3位数字

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106076 积分:539479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/12 11:47:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
BATASC750206
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
  发帖心情 Post By:2021/4/12 15:22:00 [只看该作者]

不设类别列行不行?


 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106076 积分:539479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/12 15:33:00 [只看该作者]

可以,写死固定2个字母

 回到顶部
帅哥哟,离线,有人找我吗?
BATASC750206
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
  发帖心情 Post By:2021/4/12 16:51:00 [只看该作者]

请指点下!谢谢!


 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106076 积分:539479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/12 17:06:00 [只看该作者]

比如:Dim bh As String = "AB-" & Format(d,"yyyyMM") & "-" '生成编号的前缀

 回到顶部
帅哥哟,离线,有人找我吗?
BATASC750206
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
  发帖心情 Post By:2021/4/12 18:11:00 [只看该作者]

flt = "工程代码 = '"& e.DataRow("工程代码") & "' And 制单日期 >= #" & fd & "# And 制单日期 <= #" & ld & "# And [_Identify] <> " & e.DataRow("_Identify")
     这个代码要怎么改成AB固定字母?          

 回到顶部
帅哥,在线噢!
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106076 积分:539479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/12 20:15:00 [只看该作者]

flt = "制单日期 >= #" & fd & "# And 制单日期 <= #" & ld & "# And [_Identify] <> " & e.DataRow("_Identify")

 回到顶部
总数 14 1 2 下一页