excel自制MRP系统：[2]入库单制作

1、打开“单据文件”工作表，点开入库单工作表，从A1单元格起，制作一个入库单表格，格式内容如图所示。

3、在B4（品名）单元格输入公式：=IF(LEN(A4)=0,""巳呀屋饔,IF(COUNTIF(物料信息!A:A,A4)=0,"无此编码",VLOOKUP(帆歌达缒A4,物料信息!A:F,2,FALSE)))，然后把公式往下填充到B13单元格。这个公式的意思是：如果A4单元格为空（即没A4没有录入物料编码），则B4单元格显示为空。如果A4单元格不为空（即有录入编码），但在“物料信息”的A列没有A4单元格中的这个编码，B4单元格显示为“无此编码”。如果两个条件都满足，则显示对应的查找所得的值。篇幅问题，至于每个具体函数的语法逻辑、用途，这里就不作详细解释了。

5、在D4（单位）单元格输入公式：=IF((LEN(B4)=0)+(B4="无此编码"),"",VLOOKUP(A4,物料信息!A:F,4,FALSE))，然后把公式往下填充到D13单元格。公式的意思如C4。

7、在G4（金额）单元格输入公式：=IF((F4>0)*(E4>0),E4*F4,"")，并把公式往下填充到G13单元格。这个公式的意思是，如果F4单元格（数量）和E4单元格（单价）都大于0时，则计算E4*F4(金额)，否则G4显示为空。

9、复制F14单元格，粘贴到G14，公式自动变为：=IF(SUM(G4:G13)=0,"",SUM(G4:G13))

11、在O4单元格输入公式：=IF(LEN(A4)>0,A4,"")在P4单元格输入公式：=IF((LEN($B$2)媪青怍牙>0)*(LEN(B4)>0),$B$2,"")在Q4单元格输入公式：=IF((LEN($F$2)>0)*(LEN(B4)>0),$F$2,"")在R4单元格输入公式：=IF((LEN($B$2)>0)*(LEN(B4)>0),RIGHT($H$2,10),"")在S4单元格输入公式：=IF((LEN($B4)>0),B4,"")在T4单元格输入公式：=IF((LEN($B4)>0),C4,"")在U4单元格输入公式：=IF((LEN($B4)>0),D4,"")在V4单元格输入公式：=IF((LEN($B4)>0),E4,"")在W4单元格输入公式：=IF((LEN($B4)>0),F4,"")在X4单元格输入公式：=IF((LEN($B4)>0),G4,"")在Y4单元格输入公式：=IF((LEN(H4)>0),H4,"")在Z4单元格输入公式：=IF((LEN($B$15)>0)*(LEN(B4)>0),$B$15,"")在AA4单元格输入公式:=IF(LEN(Q4)>0,MONTH(Q4),"")公式写完后全部填充到第十三行。完毕后把这个区域隐藏起来。

14、把插入的那个自选图形指定到我们刚才编写的那宏。方法：选中图形——单击右键——在弹出的对话框中选择“指定宏”——在接着弹出的对话框中先选中宏的名字，再把宏的保存位置改为“当前工作薄”——确定。至此，入库单的制做就完成了。保存一下工作薄，关闭。