利用Excel VBA完成天翼財務(wù)軟件明細(xì)賬簿目錄編制

韓瑩 郝帥杰 徐春蘭 李雪梅

[摘 要] 本文針對天翼財務(wù)會計軟件中賬簿目錄編制工作量大的問題，利用Excel VBA二次開發(fā)功能，結(jié)合工作中具體的實(shí)務(wù)，形成復(fù)旦天翼財務(wù)軟件導(dǎo)出的Excel會計明細(xì)賬簿目錄的自動化處理，減少了大量手工錄入，提高了工作效率。

[關(guān)鍵詞] 科目明細(xì)賬；摘要；目錄

[中圖分類號] F232 [文獻(xiàn)標(biāo)識碼] A [文章編號] 1673 - 0194（2014）15- 0023- 02

目前，北京市教委下屬的各學(xué)校普遍采用上海復(fù)旦天翼財務(wù)軟件進(jìn)行核算。年度終了時，打印出的科目明細(xì)賬簿不能自動生成賬簿目錄，財務(wù)人員只能等待賬簿打印完畢后，根據(jù)已經(jīng)完成的紙質(zhì)賬簿自行手工編制，由于使用會計科目接近400個，科目級次達(dá)到9級，編制賬簿目錄工作量大且效率低下。通過觀察，筆者認(rèn)為，雖然導(dǎo)出的每個明細(xì)賬簿文件中并不顯示科目名稱，但會顯示科目代碼，利用代碼可以對每個科目進(jìn)行區(qū)分，故可以先將導(dǎo)出的每個Excel明細(xì)賬進(jìn)行合并，然后根據(jù)Excel形式賬簿按照打印輸出的賬簿格式進(jìn)行設(shè)置，最終取得科目頁碼。

1 準(zhǔn)備工作

（1）從天翼財務(wù)系統(tǒng)中以Excel方式導(dǎo)出各科目明細(xì)賬本，根據(jù)單位需求分別以資產(chǎn)、負(fù)債、凈資產(chǎn)、支出、收入等建立賬簿。如欲編制資產(chǎn)類科目明細(xì)賬，需將所有資產(chǎn)類科目明細(xì)賬簿按順序全部導(dǎo)出，可直接采用天翼系統(tǒng)自動形成科目明細(xì)賬簿時的Excel文件名。

（2）在導(dǎo)出明細(xì)賬簿的同一文件夾下創(chuàng)建一個新的Excel工作簿。將SHEET 1改名為匯總，并將導(dǎo)出的文件內(nèi)容全部按順序粘貼于“匯總”頁，限于篇幅，本文將導(dǎo)出文件順序粘貼于“匯總”頁的程序部分略去不述，類似程序可參考互聯(lián)網(wǎng)；將SHEET 2改名為目錄，用以存放輸出結(jié)果。

2 編程說明

（1）每頁賬簿共計21行，由于第一行標(biāo)題行不變動，實(shí)質(zhì)內(nèi)容部分為20行，以下本文僅描述此20行，不再提及標(biāo)題行。

（2）賬簿中“摘要”列的處理?！罢钡拈L短決定了摘要所占行數(shù)，較長的摘要雖然在Excel表格中反映在一個單元格，但由于Excel文本設(shè)置中將摘要列設(shè)置為自動換行模式，所以賬簿打印時所占的高度就會超過1個標(biāo)準(zhǔn)行，在程序中將以其占用的標(biāo)準(zhǔn)行高度為分行標(biāo)準(zhǔn)。同時“摘要”單元格的列寬決定了“摘要”行的行數(shù)，故將“摘要”列寬作為分行的依據(jù)。

（3）“過次頁”和“承前頁”的設(shè)置。原則上每頁第20行顯示為“過次頁”，次頁第一行顯示為“承前頁”，但有兩類特殊情況：一是如果某頁摘要行占據(jù)了第19～20行，此時不再加“過次頁”行，直接過渡到次頁，但次頁第一行仍顯示為“承前頁”；二是如果第20行正好是“累計”，則本頁不再添加“過次頁”行，次頁第一行也不再為“承前頁”，直接顯示賬簿內(nèi)容。

3 程序代碼

4 其 他

（1）程序輸出結(jié)果為各頁的具體開始頁碼，可能需要在科目編碼后加上漢字顯示的科目目錄才會更加實(shí)用。

（2）北京市教委下屬各單位普遍采用天翼財務(wù)軟件，本程序主要的控制依據(jù)為摘要欄：一是摘要行高，二是摘要列寬。筆者在程序中的設(shè)置為本單位采用的格式，如果與本單位設(shè)置不同，只需將程序開始部分的字號、行高、列寬加以修改即可使用，故此程序具有一定的通用性。

（3）本程序已經(jīng)經(jīng)過實(shí)踐檢驗(yàn)，具有可操作性。

主要參考文獻(xiàn)

[1]羅剛君.Excel VBA程序開發(fā)自學(xué)寶典[M].第2版.北京：電子工業(yè)出版社，2011.

[2]韓瑩，等.利用Excel VBA完成教育專項資金銀行存款對賬[J].中國管理信息化，2012（10）.