對于怎么制作工資條,相信大家也看過很多相關(guān)的制作方法吧,但是制作工資條是件比較耗費時間精力的事情,如何更好更快的完成是重點。也許你已經(jīng)習(xí)慣通過工資表,把表中的條目一條條復(fù)制粘貼后打印發(fā)給每個員工??赡闶欠裣脒^,找一個更簡單更有效率的方法?看起來這似乎有些困難,因為在工資表中,表頭一般只出現(xiàn)在表格開頭的某一行,而在工資條中,為了便于閱讀則要求每個人的工資都有表頭,那么如何巧妙地把工資明細表制作成便于打印的工資條呢?下面就為大家提供三個簡單的方法。
方法一:宏命令控制法
怎么制作工資條?首先打開要處理的Excel表,選擇“工具→宏→Visual Basic 編輯器”,在編輯器左邊的窗口中用鼠標(biāo)雙擊Sheet1,會出現(xiàn)代碼編輯窗口,在代碼編輯窗口輸入如下代碼:
Sub MakeSalaryList()
Dim i As Integer
Dim endrow As Integer
測出數(shù)據(jù)的最后一行
endrow = Sheet1.Range(“a65536”).End(xlUp).Row – 1
把標(biāo)題貼過去
Worksheets(1).Range(“1:1”).Copy (Worksheets(2).Cells(1, 1))
For i = 3 To endrow
把每條數(shù)據(jù)抬頭貼過去
Worksheets(1).Range(Cells(i, 1), Cells(i, 256)).Copy (Worksheets(2).Cells(3 * i – 6, 1))
Next i
End Sub
關(guān)閉編輯器,將自動返回到剛才的Excel表,選擇“工具→宏→宏”,將彈出對話框,點擊“執(zhí)行”,將在Sheet2轉(zhuǎn)換成工資條。如果你的表總Sheet2已經(jīng)輸入了別的內(nèi)容,就可以將他復(fù)制到Sheet3來生成,代碼修改也很簡單,把其中的Sheet2修改成Sheet3就可以了,其它代碼不變。
方法二:公式填充法
怎么制作工資條?首先打開要操作的Excel工資表,為了不破壞原表(Sheet1)結(jié)構(gòu),我們?nèi)匀徊捎迷赟heet2中進行操作的方法。由于這個工資表一共有L列,18行,要復(fù)制的表頭項目在第二行,所以在第一個單元格中輸入如下公式:
以下是代碼片段:
=IF(MOD(ROW(),2)=0,INDEX(sheet1!$A:$L,INT(((ROW()+1)/2))+2,COLUMN()),sheet1!A$2)
接下來的工作就簡單了,我們只要使用填充柄將此公式填充到其它單元格,列向填充到L列,行填充到18行就大功告成。
因為在不同的表格中這個公式需要修改的地方比較多,所以這里做一下解釋:
由于工資條中的奇數(shù)行都是表頭,偶數(shù)行是數(shù)據(jù),所以在這個公式中首先進行奇偶行判斷,若是奇數(shù)行,直接取工資表的A2單元格數(shù)據(jù)(即公式中的 sheet1!A$2,如果表頭數(shù)據(jù)在第4行第三列則修改為sheet1!C$4)。若是偶數(shù)行,則用INDEX()函數(shù)來取數(shù)。該函數(shù)的第一個參數(shù)是指 定工資表中的一個取數(shù)區(qū)域(即sheet1!$A:$L,如果不是從A到L列,那么可以修改這個參數(shù),如修改為sheet1!$B$P ,就表示在B到P列之間取數(shù))。當(dāng)然,如果你想把轉(zhuǎn)換后的數(shù)據(jù)放在Sheet3而不是Sheet2中,那么,只要在Sheet3中執(zhí)行以上操作就可以了, 并不需要修改公式的內(nèi)容。
方法三:螞蟻工資條
怎么制作工資條?可以使用螞蟻工資條軟件,用戶只需使用自己的工資表,并將表格上傳到系統(tǒng)中。系統(tǒng)會自動識別表頭和數(shù)據(jù),將工資表拆分為工資條,并發(fā)放給對應(yīng)的員工,每個員工僅能收到自己的工資條,既保證了工資保密性,又節(jié)省HR的時間和精力。
以上就是關(guān)于怎么制作工資條的三種方法,大家可以根據(jù)自己的喜好來進行選擇,以后再也不需要無限重復(fù)的去復(fù)制工資表數(shù)據(jù),通過簡單的轉(zhuǎn)化一個數(shù)據(jù)表就實現(xiàn)了兩項完全不同的功能,趕快操練一下吧!