2018Ｅｘｃｅｌ在商业银行数据处理中的应用设计

1520103

　　;作者：关长杰;
[摘;要];本文主要是针对商业银行电子银行会计处理中的凭证设计和填制、打印等问题,利用计算机进行了自动化设计。
　　[关键词];电子银行;原始凭证;函数
　　
　　随着电子银行的普及，银行会计的数据处理工作中存在的问题也日益显露，笔者认为电子银行业务开展后，银行会计的日常数据处理工作中存在票据中数据的填制等具体的业务处理问题可以通过EXCEL的强大的电子数据处理功能来完成。
　　银行会计在填制某些原始凭证的时候，如银行承兑汇票等票据，以前都是用手工方法填写，工作量大，且容易出错，为了节约人力和财力，笔者在调研后进行了如下设计：
　　一、打印区域设置
　　以网银手续费凭证的填制为例,如图1，会计人员需要在印制好格式的凭证上填制如下内容,笔者通过测量凭证上需要填制的位置,通过EXCEL的列宽和行高来设定数据区域。
　　二、单位名称设置
　　对于单位名称和账号等，可以直接输入账号，利用VLOOK（）函数来自动完成填制。例如，我们预先设置一个客户名称与账号工作表如图2，然后在网上银行手续费工作表中C2单元格中输入公式:=VLOOKUP(A3,客户名称与账号!B3:C38,2,FALSE)，则只要在A3单元格中输入相关的单位账号，就可以直接取得相关的单位名称。
　　三、金额自动填写设计
　　如图,我们设K8单元格为数据源，可以通过函数或链接等方式获取数据,笔者在此处通过直接输入数字的方式来说明问题。
　　在S6单元格中输入公式：=INT($K$8100)-INT($K$810)10，直接获取分位数字。设计如下：
　　1.获取角分位数字。设K8单元格中的数为345.67（元），则INT($K$8100)的运算结果为34567，而$K$810的运算结果为3456.7，INT($K$810)10的运算结果为34560，则INT($K$8100);-INT($K$810)10=34567-34560=7，为S6单元格中的分位数字，同理，在角位输入：=INT(ABS($K$810))-INT(ABS($K$8))10，在元位输入：=INT(ABS($K$8))-INT(ABS($K$8/10))10，则角位和元位数字也可以轻松取得。
　　2.整数位数字的确定和人民币符号的设置。在T8单元格输入：=;INT(K8)，再在P6单元格中输入公式：=IF(LEN($T$8)=2,LEFT(RIGHT($T$8,2),1),￥)。
　　在O6单元格中输入：=IF(LEN($T$8)=3,LEFT(RIGHT($T$8,3),1),IF(LEN($T$8)=2,￥,))，同理，N6、M6、L6、K6单元格中分别输入：=IF(LEN($T$8)=4,LEFT(RIGHT($T$8,4),1),IF(LEN($T$8)=3,￥,))，=IF(LEN($T$8)=5,LEFT(RIGHT($T$8,5),1),IF(LEN($T$8)=4,￥,))，=IF(LEN($T$8)=7,LEFT(RIGHT($T$8,7),1),IF(LEN($T$8)=6,￥,))（假设数字不超过百万），完成了小写数字与￥输入工作。
　　3.生成大写金额。在C8单元格中输入：=TEXT(INT(ABS(K8)),[DBNum2])，然后在单元格D8中输入：=TEXT(INT(ABS(K8;10))-INT(ABS(K8))10,[DBNum2])或=TEXT(R6,[DBNum2])，在E8单元格中输入：=TEXT(INT(ABS(K8100))-INT(ABS(K810))10,[DBNum2])或=TEXT(S6,[DBNum2])，然后我们在B7单元格中输入：=IF(K80.1,E8分,(IF(K8=INT(K8),C8元整,(IF(C8=零,(IF(D8=零,零E8分,D8角(IF(E8=零,,E8分)))),C8元(IF(D8=零,零E8分,D8角(IF(E8=零,,E8分)))))))))。
　　也可以设置如下：在C8单元格中输入：=TEXT(INT(ABS(K8)),[DBNum2][$-804]G/通用格式元)，直接取出不含角分的数值，然后和上面同理，取整、角或分，此处不再探讨。
　　为了隐藏第8、9行的数值，可以设置文字颜色为白色，打印的时候就不打印这部分的内容了。
　　四、日期自动更正为银行特殊规定格式的设计
　　银行要求会计人员在填写有关凭证的时候，需要按照某某某某年某某月某某日的大写格式来填写，主要是为了防止篡改日期。而我们在利用EXCEL作为工具的时候，发现其日期格式根本没有我们所需要的格式,可以通过如下操作完成日期格式设计：
在设置单元格格式的时候，采用自定义格式，输入：[DBNum2][$-804]yyyy年mm月dd日贰零零柒年零叁月零贰日。
　　也可以在特定的单元格（假设为AC17）中输入：=TEXT(AD17,[DBNum2][$-804]yyyy年mm月dd日)其中，设AD17为输入日期的单元格，则AC17单元格返回的数值为银行规定的日期格式：某某某某年某某月某某日。
　　参考文献:
　　[1]刘宣杰;李志刚:用友ERP沙盘应收账款存在的问题与设想[J].商场现代化，2007.10
　　[2]电脑报:Office办公应用疑难破解[M].汕头大学出版社,2005.6