返回目录:excel表格制作
方法/步骤
首先把收款明细的相关数据表做好,下图是模拟表格。
接着把收据模板制作好,如下图,里面涉及到合并单元格、设置边框等,这里不详述。
下面就是进行数据提取了,先在原始数据表格中添加一辅助列,并填充以0开始的序列号,如图。
在收据表格的L1或其他位置输入数字1,在B3输入公式=IF(VLOOKUP($L$1,收款明细!A:J,3,0)="","",VLOOKUP($L$1,收款明细!A:J,3,0)),提取交款单位。
在B4输入公式=IF(VLOOKUP($L$1,收款明细!A:J,5,0)="","",VLOOKUP($L$1,收款明细!A:J,5,0)),提取交款事由。
接着输入公式=IF(VLOOKUP($L$1,收款明细!A:J,6,0)="","",VLOOKUP($L$1,收款明细!A:J,6,0))、=IF(VLOOKUP($L$1,收款明细!A:J,7,0)="","",VLOOKUP($L$1,收款明细!A:J,7,0))分别提取金额和方式,并把金额一栏的单元格格式设置为货币e799bee5baa6e58685e5aeb9332格式,如图。
把小写金额转化成大写,在B6输入公式=IF(ROUND(B5,2)=0,"零元整",IF(B5<0,"负","")&IF(ABS(B5)>=1,TEXT(INT(ROUND(ABS(B5),2)),"[dbnum2]")&"元","")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(B5,2),2),"[dbnum2]0角0分;;整"),"零角",IF(B5^2<1,,"零")),"零分","整"))。
分别输入公式=IF(VLOOKUP($L$1,收款明细!A:J,2,0)="","",VLOOKUP($L$1,收款明细!A:J,2,0))、=YEAR(收款明细!D2)、=MONTH(收款明细!D2)、=DAY(收款明细!D2)、=IF(VLOOKUP($L$1,收款明细!A:J,8,0)="","",VLOOKUP($L$1,收款明细!A:J,8,0))、=IF(VLOOKUP($L$1,收款明细!A:J,9,0)="","",VLOOKUP($L$1,收款明细!A:J,9,0))、=IF(VLOOKUP($L$1,收款明细!A:J,10,0)="","",VLOOKUP($L$1,收款明细!A:J,10,0))提取序号、年月日、收款人等,如图。
保存表格,这样只需要更改L1里的数字,其他内容会相应更新,如图。
这个建议考虑使用vba来实现吧
具体要根据楼主的明确需求而定
用英文字母、数字、标点符号进行组合,就做成程序了
这个问题可以zhidao用WORD提供的“邮件合并”功能来完成,很方便的。在excel中记录相关需要打印的版姓名,起止时间,然后在WORD中建立一个打印格式的空白表格,在WORD中使用“工具”菜单下权的“邮件合并”命令,分别引用excle中的姓名…………信息就行了。