- 1、本文档共6页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
如何自己编写EXCEL支票等票据打印软件
如何自己编写EXCEL支票等票据打印软件
共十四个步骤:
一、需求设计:需实现的功能,包括:存根的附加信息、日期、收款单位、金额、业务内容(用途)、出票人、支票的大写日期、收款单位、大小写金额、帐号、支付密码、业务内容(用途)等,其中那些项目要打印出来。
二、思路设计:设计为三个表——Sheet,第一表(Sheet1)为支票打印及数据输入表、第二表(Sheet2)为数据支持表、第三表(Sheet3)为控制表。
三、支票背景:用扫描仪将打印的支票扫描实图存入一文件,按42%的缩小比例编辑此文件,存入后缀名为JPG的文件备用。
四、读入背景:打开一空的EXCEL表,将后缀名为JPG的支票文件通过“格式——工作表——背景”设计为支票背景。
五、表格调整:按背景中支票的打印内容调整表格行列宽度,合并单元格等,将支票背景区设定打印区域,另设如单位代码、金额、内容(用途)、帐号、支付密码、出票人等信息的编辑区域,为编写公式做准备。注意各单元格属性设置,如附加信息、收款单位、业务内容、大写金额、帐号、支付密码和业务内容为文本,收款单位和大写金额还应该在“设置——单元格格式——对齐”中设置为“缩小字体填充”。
六、录入公式:编辑存根的附加信息、日期、收款单位、金额、业务内容、出票人、支票的大写日期、收款单位、大小写金额、帐号、支付密码、业务内容等取数值和取字符的公式,以编辑区域的单位代码(X10)、金额(X11)、附件(X12)、用途(X13)、帐号(X6)、支付密码(X9)、出票人(X14),另以支票的小写金额从大至小位置在N8至X8区间、Sheet2表中A行为单位代码、B行为会计科目编码、C行为会计核算科目、D行为单位名称、E行为银行帐号、F行为开户银行,G行为联系人、H行为联系电话为例。编写的公式明细分别为:
1、存根的附加信息:=“结算单”X12“份”
2、存根的日期:
=NOW() 单元格设计为自定义yyyy mm dd
3、存根的收款单位:
=IF(X10=,,LOOKUP(X10,Sheet2!A1:A10067,Sheet2!D1:D10067))
4、存根的金额:=X11
5、存根的业务内容(用途):=X13
6、存根的出票人(出纳、会计、记帐等):=X14
7、支票的大写日期:
测试成功
年:=TEXT(F20,[DBNum2]e)
月:=IF(OR(MONTH(F20)={1,2,3,4,5,6,7,8,9,10}),零,)TEXT(F20,[DBNum2]M)
日:=IF(MOD(DAY(F20),10),,零)TEXT(F20,[DBNum2]DD)
=NOW() 单元格设计为自定义[DBNum2][$-804] yyyy mmmm dd
=TEXT(F20,e [dbnum2]IF(MONTH(F20)=10,零,)mm IF(MOD(DAY(F20),10),,零)dd )
8、支票的收款单位:
=IF(X10=,,LOOKUP(X10,Sheet2!A1:A10067,Sheet2!D1:D10067))
9、支票的小写金额亿元:
=IF(AND(X1110000000,X11100000000),¥,)
10、支票的小写金额千万元:
=IF(OR(P8=¥,Q8=¥,R8=¥,S8=¥,T8=¥,U8=¥,V8=¥),,IF(X1110000000,¥,IF(X11=INT(X11),LEFT(RIGHT(X11,8),1),LEFT(RIGHT(X11*100,10),1))))
11支票的小写金额百万元:
=IF(OR(Q8=¥,R8=¥,S8=¥,T8=¥,U8=¥,V8=¥),,IF($X$111000000,¥,IF($X$11=INT($X$11),LEFT(RIGHT($X$11,7),1),LEFT(RIGHT($X$11*100,9),1))))
12支票的小写金额十万元:
=IF(OR(R8=¥,S8=¥,T8=¥,U8=¥,V8=¥),,IF($X¥,IF($X$11=INT($X$11),LEFT(RIGHT($X$11,6),1),LEFT(RIGHT($X$11*100,8),1))))
13支票的小写金额万元:
=IF(OR(S8=¥,T8=¥,U8=¥,V8=¥),,IF($X$1110000,¥,IF($X$11=INT($X$11),LEFT(RIGHT($X$11,5),1),LEFT(RIGHT($X$11*100,7),1))))
14支票的小写金额千元:
=IF(OR(T8=¥,U8=¥,V8=¥),,IF($X$111000,¥,IF($X$11=INT($X$11),LEFT(RIGHT($X$11,4),
您可能关注的文档
- 大学新视野英语课后翻译.doc
- 大学日语教程翻译整理.doc
- 大学校园文化设计.doc
- 大学生假期安排调查问卷.doc
- 大学生公寓自管会ISO9001认证体系.doc
- 大哥,我来请你坐几天牢.doc
- 大学生创业能力竞赛活动策划书.doc
- 大学生周末生活安排调查.doc
- 大学生如何实践科学发展观.doc
- 大学生学期总结1500字.doc
- 5.3.1函数的单调性(教学课件)--高中数学人教A版(2019)选择性必修第二册.pptx
- 部编版道德与法治2024三年级上册 《科技提升国力》PPT课件.pptx
- 2.7.2 抛物线的几何性质(教学课件)-高中数学人教B版(2019)选择性必修第一册.pptx
- 人教部编统编版小学六年级上册道德与法治9 知法守法 依法维权(第一课时)课件.pptx
- 三年级上册品德道德与法治《学习伴我成长》.pptx
- 部编版小学道德与法治六年级上册6 人大代表为人民 课件.pptx
- 部编版小学道德与法治六年级上册1感受生活中的法律第一课时课件.pptx
- 2.5.2圆与圆的位置关系(教学课件)-高中数学人教A版(2019)选择性必修第一册.pptx
- 2.5.1直线与圆的位置关系-(教学课件)--高中数学人教A版(2019)选择性必修第一册.pptx
- 14.1.1 同底数幂的乘法(教学课件)-初中数学人教版八年级上册.pptx
文档评论(0)