如何用VB制订货单?
发布网友
发布时间：2024-10-22 00:55
共1个回答
热心网友
时间：2024-11-09 22:23
1、在《明细表》的B列左侧插入一列（必须插到此处！），这样新插入的列即为B列，在新插入的列的B2中输入=IF(J2="生产中",J2&ROW(A1),"")，下拉；
2、《生产中》表的结构 是否与《明细表》基本一致？建议一致（这样好操作），即A列到J列的内容仍为：序号 日期 客户 品名 数量 单价 金额 订金 完成情况 欠款 。
3、在《生产表》的K2中输入
=INDEX(明细表!B:B,SMALL(IF(MATCH(明细表!B$1:B$1000&"",明细表!B$1:B$1000&"",)=ROW($1:$1000),ROW($1:$1000),4^8),ROW(B2)))&""，同时按Shift+Ctrl+Enter三个组合键，这样该公式的两端会出现大括号。下拉（如果不想显示该列，完成公式后，可以隐藏）
4、在《生产表》的B2中输入
=IF($K2="","",VLOOKUP($K2,明细表!$B:$K,COLUMN(B1),FALSE))，右拉至J2，并继续下拉。这时也许会出现许多错误标记，不要着急，将B列设为日期格式（选取B列，设置单元格格式---数字---日期），同样的方法，将C列至J列，设置为常规。
