使用Excel按人頭制作工資條，網(wǎng)上有兩個(gè)解決方案，一個(gè)是利用Word的“郵件合并”功能(詳見http://soft.yesky.com/office/37/2504037.shtml)，另一個(gè)是利用VBA來實(shí)現(xiàn)。

　　用“郵件合并” 功能操作雖說不難，但數(shù)據(jù)過多時(shí)也很麻煩；用VBA處理起來倒是很方便，但幾十行的程序也夠初學(xué)者忙活的。經(jīng)過一番試驗(yàn)，筆者找出了一個(gè)比較簡單的方法，只需一個(gè)公式就可以按人頭打印出工資條來。

　　新建一Excel文件，在sheet1中存放工資表的原始數(shù)據(jù)，假設(shè)有N列。第一行是工資項(xiàng)目，從第二行開始是每個(gè)人的工資。

　　在sheet2中我們來設(shè)置工資條。根據(jù)實(shí)際情況，工資條由三行構(gòu)成，一行對應(yīng)工資項(xiàng)目，一行對應(yīng)一個(gè)人的工資數(shù)據(jù)，然后是一個(gè)空行用來方便切割。這樣三行構(gòu)成一個(gè)工資條。工資項(xiàng)目處在行號除以3余數(shù)為1的行上；空行處在行號能整除3的行上。以上兩行不難設(shè)置，關(guān)鍵是工資數(shù)據(jù)行，牽扯到sheet1與 sheet2中數(shù)據(jù)的對應(yīng)，經(jīng)分析不難看出“sheet1中的數(shù)據(jù)行=INT((sheet2中的數(shù)據(jù)行+4)/3)”。

　　這樣我們在sheet2的A1單元格中輸入公式“=IF(MOD(ROW(),3)=0,"",IF(MOD(ROW(),3)=1,Sheet1!A$1,INDEX(Sheet1!$A:$N,INT((ROW()+4)/3),COLUMN())))”。確認(rèn)后選擇A1單元格，把鼠標(biāo)放在A1單元格的右下角，鼠標(biāo)變成“+”時(shí)，向右拖動鼠標(biāo)自動填充至N列，這樣工資條中的第一行就出來了。選定A1：N1，把鼠標(biāo)放在N1單元格的右下角，鼠標(biāo)再次變成“+”時(shí)，向下拖動鼠標(biāo)自動填充到數(shù)據(jù)的最后一行，工資條就全部制作完成了。

　　該公式運(yùn)用IF函數(shù)，對MOD函數(shù)所取的引用行號與3的余數(shù)進(jìn)行判斷。如果余數(shù)為0，則產(chǎn)生一個(gè)空行；如果余數(shù)為1，則固定取sheet1中第一行的內(nèi)容；否則運(yùn)用INDEX函數(shù)和INT函數(shù)來取Sheet1對應(yīng)行上的數(shù)。

　　最后來設(shè)置一下格式，選定A1：N2設(shè)上表格線，空行不設(shè)。然后選定A1：N3，拖動N3的填充柄向下自動填充，這樣有數(shù)據(jù)的有表格線，沒有數(shù)據(jù)的沒有表格線。最后調(diào)整一下頁邊距，千萬別把一個(gè)工資條打在兩頁上。怎么樣，還滿意吧?（下載樣表）