作者:iamlaosong
公司各支部收到的黨費需要彙到公司公款賬戶。由于無法手機轉賬,必須到櫃台辦理,是以每次需要填寫彙款單。彙款單涉及彙款人和收款人賬号,收款人賬戶名稱還特别長,居然用了32個字,填起來很麻煩,還容易出錯,是以就做了個工具,列印這張彙款單,其他支部也可以用。如下圖,隻要改變序号,列印目前表就可以列印明細表中不同支部的彙款單,不用寫任何代碼。彙款單需要一張一張的列印(塞一張單據列印一張),是以沒有程式設計的必要。
![](https://img.laitimes.com/img/__Qf2AjLwojIjJCLyojI0JCLiAzNfRHLGZkRGZkRfJ3bs92YsYTMfVmepNHL9MWbiZnTzIGa4dlYoxmMMBjVtJWd0ckW65UbM5WOHJWa5kHT20ESjBjUIF2X0hXZ0xCMx81dvRWYoNHLrdEZwZ1Rh5WNXp1bwNjW1ZUba9VZwlHdssmch1mclRXY39CXldWYtlWPzNXZj9mcw1ycz9WL49zZuBnL2YTN0MTMxETM5EzNwkTMwIzLc52YucWbp5GZzNmLn9Gbi1yZtl2Lc9CX6MHc0RHaiojIsJye.png)
本身沒多少難點,和以前列印對賬單、快遞單差不多,關鍵點如下:
1、根據彙款單設定列印區域,區域外面不列印。方法是:菜單“頁面布局”下的“列印區域”下的“設定列印區域”;
2、插入或複制一個文本框(菜單“插入”下的“文本框”)列印内容放置在文本框中,文本框内容關聯下面的單元格,如下圖:
3、單元格内容通過序号和明細表關聯,公式是如下:
=INDEX(明細!$A$2:$H$1001,MATCH($K$31,明細!$A$2:$A$1001,0),COLUMN()+1)
或者
=INDEX(明細!$B$2:$H$1001,MATCH($K$31,明細!$A$2:$A$1001,0),COLUMN())
不同列單元格的公式都是一樣,因為列号用函數COLUMN()傳回,如下圖:
資料區域從A列開始列号要加1(COLUMN()+1)或者從B列開始,列印表中沒有序号(A列)一列,如下圖:
4、金額需要轉換為單個數字,儲存到單元格,以便和文本框關聯。如:
分位金額公式:=INT($D$31*100)-INT($D$31*10)*10
角位金額公式:=INT($D$31*10)-INT($D$31/1)*10
個位金額公式:=INT($D$31/1)-INT($D$31/10)*10
十位金額公式:=INT($D$31/10)-INT($D$31/100)*10
百位金額公式:=INT($D$31/100)-INT($D$31/1000)*10
千位金額公式:=IF($D$31<1000,"¥",INT($D$31/1000)-INT($D$31/10000)*10)
萬位金額公式:=IF($D$31<1000,"",IF(D31<10000,"¥",INT($D$31/10000)))
十萬位金額公式:=IF($D$31<1000,"",IF($D$31<10000,"","¥"))
其實萬位以上就可以不考慮了,沒那麼多錢。點選下載下傳:列印郵政彙款單