Ｅｘｃｅｌ在商業銀行數據處理中的應用設計

[摘 要] 本文主要是針對商業銀行電子銀行會計處理中的憑證設計和填制、打印等問題，利用計算機進行了自動化設計。

[關鍵詞] 電子銀行 原始憑證 函數

隨著電子銀行的普及，銀行會計的數據處理工作中存在的問題也日益顯露，筆者認為電子銀行業務開展后，銀行會計的日常數據處理工作中存在票據中數據的填制等具體的業務處理問題可以通過EXCEL的強大的電子數據處理功能來完成。

銀行會計在填制某些原始憑證的時候，如銀行承兌匯票等票據，以前都是用手工方法填寫，工作量大，且容易出錯，為了節約人力和財力，筆者在調研后進行了如下設計：

一、打印區域設置

以網銀手續費憑證的填制為例，如圖1，會計人員需要在印制好格式的憑證上填制如下內容，筆者通過測量憑證上需要填制的位置，通過EXCEL的列寬和行高來設定數據區域。

二、單位名稱設置

對于單位名稱和賬號等，可以直接輸入賬號，利用VLOOK（）函數來自動完成填制。例如，我們預先設置一個“客戶名稱與賬號”工作表如圖2，然后在“網上銀行手續費”工作表中C2單元格中輸入公式:=VLOOKUP(A3，客戶名稱與賬號!B3:C38，2，FALSE)，則只要在A3單元格中輸入相關的單位賬號，就可以直接取得相關的單位名稱。

三、金額自動填寫設計

如圖，我們設K8單元格為數據源，可以通過函數或鏈接等方式獲取數據，筆者在此處通過直接輸入數字的方式來說明問題。

在S6單元格中輸入公式：=INT($K$×8100)-INT($K$8×10)10，直接獲取分位數字。設計如下：

1.獲取角分位數字。設K8單元格中的數為345.67（元），則INT($K$8×100)的運算結果為34567，而$K$8×10的運算結果為3456.7，INT($K$8×10)10的運算結果為34560，則INT($K$8×100) -INT($K$8×10)×10=34567-34560=7，為S6單元格中的分位數字，同理，在角位輸入：=INT(ABS($K$8×10))-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(K8×100))-INT(ABS(K8×10))×10，”[DBNum2]”)或=TEXT(S6，”[DBNum2]”)，然后我們在B7單元格中輸入：=IF(K8<0.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”日”;@，定義其格式即可。例如，輸入2007-3-2，則自動顯示為“貳零零柒年零叁月零貳日”。

也可以在特定的單元格（假設為AC17）中輸入：=TEXT(AD17，”[DBNum2][$-804]yyyy年mm月dd日”)其中，設AD17為輸入日期的單元格，則AC17單元格返回的數值為銀行規定的日期格式：“某某某某年某某月某某日”。

參考文獻:

[1]劉宣杰 李志剛:用友ERP沙盤應收賬款存在的問題與設想[J].商場現代化，2007.10

[2]電腦報:Office辦公應用疑難破解[M].汕頭大學出版社，2005.6

注：本文中所涉及到的圖表、注解、公式等內容請以PDF格式閱讀原文