用Excel插件掌上工資條－－無需上傳，無需導(dǎo)入，直接在財(cái)務(wù)的工資表中進(jìn)行批量發(fā)送（數(shù)據(jù)雙重加密傳輸

工資條的錄入是個(gè)體力活，還需要打印下來保證信息的完善，這里提供幾個(gè)制工資條的方法。

材料/工具

excel

方法1

輔助序列法，做出這個(gè)樣子。

第一步：首先依據(jù)實(shí)際情況填好工資表的各項(xiàng)必備信息，如圖如何用函數(shù)快速制作工資條2第二

選中數(shù)據(jù)區(qū)域，點(diǎn)擊篩選。

用VBA吧，代碼如下： ----------代碼開始---------- Cells.Sele

升序排列。

刪掉無用數(shù)據(jù)。

以WPS 2019版本為例：關(guān)于怎么用excel快速的做幾百人的工資條，您可考慮使用WPS2019

方法2

隨意輸入對角線，按F5選擇定位條件。

用Excel插件掌上工資條－－無需上傳，無需導(dǎo)入，直接在財(cái)務(wù)的工資表中進(jìn)行批量發(fā)送（數(shù)據(jù)雙重加密傳輸

選空值。

右鍵，插入整行。

工資條是個(gè)人工資明細(xì)的一種表現(xiàn)方式，你可將“工資條”設(shè)為引用表， 第一行為標(biāo)題，即多行標(biāo)題的最明

復(fù)制標(biāo)題行，選擇插入?yún)^(qū)域。

第一步：首先依據(jù)實(shí)際情況填好工資表的各項(xiàng)必備信息，如圖如何用函數(shù)快速制作工資條2第二

按F5定位為空值。

用VBA吧，代碼如下： ----------代碼開始---------- Cells.Sele

右鍵選擇的區(qū)域點(diǎn)擊粘貼值。

以WPS 2019版本為例：關(guān)于怎么用excel快速的做幾百人的工資條，您可考慮使用WPS2019

刪除無效數(shù)據(jù)。

方法3

輸入a1。

向下復(fù)制到a9（比原數(shù)據(jù)多一條）。

F5定位空值。

接下來操作如方法2。

方法4

復(fù)制標(biāo)題行到11行。

A列輸入序號1，B列輸入公式。=VLOOKUP($A15,$A$1:$C$9,COLUMN(B5),0)

向右復(fù)制。

選擇標(biāo)題行和公式行，向下復(fù)制。

方法5

復(fù)制序號一列到輔助列。

輔助列下輸入1.1，2.1。

選中向下復(fù)制。

選擇數(shù)據(jù)區(qū)域，點(diǎn)擊升序排列。

接下來的定位空值和插入操作如同方法2。

擴(kuò)展閱讀，以下內(nèi)容您可能還感興趣。

如何一分鐘快速制作工資條，工資條制作軟件，下載模板

想 要知 快 速 制 作 工 資 條 ， 薪 資 管 家 你 用 了 嗎 。 分 分 鐘 幫 你 搞 定 這 個(gè) 難 題 。 下 面 我 來 詳 細(xì) 教 你 具 體 的道 操 作 方 法 。 首 先 注 冊 薪 資 管 家 ， 第 一 步 ， 注 冊 薪 資 管 家 ； 第 二 步 ， 上 傳 任 意 格 式 e x c e l 工 資 表 ； 第 三 步 ， 自 動 生 成 獨(dú)內(nèi) 立 工 資 條 , 一 鍵 群 發(fā) 到 員容 工 注 冊 的 A P P ; 第 四 步 ， 員 工 登 錄 查 詢 自 己 的 工 資 條 。本回答被提問者采納

多行工資條快速制作方法

工資條是個(gè)人工來資明細(xì)的一種表現(xiàn)方式，你可將“工資條”設(shè)為引用表，

第一行為標(biāo)題，即自多行標(biāo)題的最明細(xì)目，

即 A1 B1 C1 D1 E1 F1

序號百、姓名、基本工資、工齡、社齡、學(xué)歷……；度

第二行為金額

A2

=SHEET1 （2）！A7

如何快速制做工資條

EXCEL中一個(gè)簡單的工資條制作辦法作者：詹堯輝問題：在Excel2000做成的工資表，只有第一個(gè)人有工資條的條頭（如編號、姓名、崗位工資，年限工資……），想輸出成工資條的形式。怎么做？

　　解決方法：

　?。?）、假設(shè)原工資表為“表1”，先復(fù)制“表1”到某新空白表中，命名為“表2”，刪去“表2”中的多余行，使工資條頭位于第一行，職工工資數(shù)據(jù)依次緊排在條頭之后。：

　　（2）、在“表2”工資數(shù)據(jù)的后一列H中，增加“標(biāo)注”欄，依次向下填充入1，2，3…等步長為1的序列數(shù)。

　?。?）、選中“表2”工資條頭下（工資條頭不選）第2至最后一行，右鍵：插入，表2中將出現(xiàn)許多新增空行，將條頭數(shù)據(jù)填入這些新增空行中（方法：選中A1：G1，右鍵“復(fù)制”，然后選中所有新增空行，右鍵“粘貼”即可e799bee5baa6e79fa5e98193e59b9ee7ad9431333332623265，也可用拖拽填充法）。然后在其“標(biāo)注”欄中依次填上1.5，2.5，3.5…。等步長為1的序列數(shù)。操作結(jié)果示意如下：

　　（4）、再次選中“表2”第2行至最后一行，點(diǎn)擊菜單：數(shù)據(jù)-排序-按“標(biāo)注”列（遞增）排序，點(diǎn)擊確定。再選中H“標(biāo)注”列，右鍵：“隱藏”或“刪除”，這樣，工資條即基本制作完畢。

　　（5）、制作完成的工資條裁開后即可分發(fā)給同事了。您如果覺得此表格過于擁擠，還可用類似的方法在每個(gè)人之間插入空行。

HR如何用函數(shù)快速用Excel制作工資條

第一步：首先依據(jù)實(shí)際情況填好工資表的各項(xiàng)必備信息，如圖

如何用函數(shù)快速制作工資條

2

第二步：算出扣款小計(jì)：在L5單元格輸入公式=SUM(G5:K5)，然后下拉填充。（這里是在L5單元格輸入公式，可根據(jù)實(shí)際情況自己選擇單元格。）

如何用函數(shù)快速制作工資條

3

第三步：在M5單元格輸入公式=SUM(C5:F5)-L5，計(jì)算出應(yīng)發(fā)工資，然后下拉。

如何用函數(shù)快速制作工資條

4

第四步：用應(yīng)發(fā)工資減去個(gè)人所得稅得到實(shí)發(fā)工資，在O5單元格輸入公式=M5-N5，計(jì)算出實(shí)發(fā)工資，然后下拉。

如何用函數(shù)快速制作工資條

5

第五步：至此，工資表制作完畢，下面開始制作工資條：復(fù)制工資表，然后刪除7a64e59b9ee7ad9431333365653765內(nèi)容只留下表頭，復(fù)制的工作表名稱改為“工資條”，在A6單元格輸入序號“1”。

如何用函數(shù)快速制作工資條

6

第六步：在B6單元格輸入公式=VLOOKUP($A6,XXX公司工資表!$A$5:$P$4995,COLUMN(B4),0)，然后向右拉。

如何用函數(shù)快速制作工資條

7

第七步：選中A4:P6，如果人與人之間需要留一空行，就選中A4:P7，向下拉，如圖。

如何用函數(shù)快速制作工資條

8

第八步：如果想要統(tǒng)計(jì)實(shí)發(fā)工資總額，可以在O25單元格輸入公式=SUM(O6:O22)，如圖。

如何用函數(shù)快速制作工資條

9

如此，工資條制作完成，工資表可留底備案，工資條打印后裁切發(fā)給員工。

END

如何快速制作工資條（雙行標(biāo)題）！

用VBA吧，代碼如下： ----------代碼開始---------- Cells.Select

Range("F1").Activate

Selection.Borders(xlDiagonalDown).LineStyle = xlNone

Selection.Borders(xlDiagonalUp).LineStyle = xlNone

Selection.Borders(xlEdgeLeft).LineStyle = xlNone

Selection.Borders(xlEdgeTop).LineStyle = xlNone

Selection.Borders(xlEdgeBottom).LineStyle = xlNone

Selection.Borders(xlEdgeRight).LineStyle = xlNone

Selection.Borders(xlInsideVertical).LineStyle = xlNone

Selection.Borders(xlInsideHorizontal).LineStyle = xlNone '選擇整個(gè)表去掉表格線

Rows("3:3").Select '選擇第3行

num = (ActiveSheet.UsedRange.Rows.Count - 2) * 4 '獲取工資表除標(biāo)題外的總行數(shù)，并*4以創(chuàng)建雙行標(biāo)題工資條

col = ActiveSheet.UsedRange.Columns.Count '獲取工資表的總列數(shù)

Selection.Insert Shift:=xlDown

Selection.Insert Shift:=xlDown '在選中行前插入兩行，以填充標(biāo)題行

num1 = 6 '從第六行開始，循環(huán)每四行插入空行

Do While num1 <= num

Range(Cells(num1, 1), Cells(num1, col)).Select

Selection.Insert Shift:=xlDown

Selection.Insert Shift:=xlDown

Selection.Insert Shift:=xlDown

num1 = num1 + 4

Loop

Range(Cells(1, 1), Cells(2, col)).Select '選擇標(biāo)題行

Application.CutCopyMode = False

Selection.Copy

Range("A3").Select

ActiveSheet.Paste '粘貼標(biāo)題行到A3單元格

num2 = 7 '從第七行開始，循環(huán)每四行粘貼標(biāo)題行

Do While num2 <= num

Range(Cells(1, 1), Cells(2, col)).Select

Application.CutCopyMode = False

Selection.Copy

Cells(num2, 1).Select

ActiveSheet.Paste

num2 = num2 + 4

Loop

Range(Cells(3, 1), Cells(5, col)).Select '選擇第3行到第5行（第一個(gè)工資條），以設(shè)置工資條格式

Application.CutCopyMode = False

Selection.Borders(xlDiagonalDown).LineStyle = xlNone

Selection.Borders(xlDiagonalUp).LineStyle = xlNone

With Selection.Borders(xlEdgeLeft)

.LineStyle = xlDouble

.Weight = xlThick

.ColorIndex = xlAutomatic

End With

With Selection.Borders(xlEdgeTop)

.LineStyle = xlDouble

.Weight = xlThick

.ColorIndex = xlAutomatic

End With

With Selection.Borders(xlEdgeBottom)

.LineStyle = xlDouble

.Weight = xlThick

.ColorIndex = xlAutomatic

End With

With Selection.Borders(xlEdgeRight)

.LineStyle = xlDouble

.Weight = xlThick

.ColorIndex = xlAutomatic

End With

With Selection.Borders(xlInsideVertical)

.LineStyle = xlDash

.Weight = xlThin

.ColorIndex = xlAutomatic

End With

With Selection.Borders(xlInsideHorizontal)

.LineStyle = xlDash

.Weight = xlThin

.ColorIndex = xlAutomatic

End With '格式設(shè)置完7a64e58685e5aeb931333332623436畢

Selection.Copy '復(fù)制已設(shè)置好格式的工資條

Range(Cells(7, 1), Cells(9, col)).Select '選擇第二個(gè)工資條

Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False '粘貼工資條樣式

num3 = 11 '從第十五行開始，循環(huán)每四行粘貼工資條樣式

Do While num3 <= num

Range(Cells(num3, 1), Cells(num3 + 2, col)).Select

Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

num3 = num3 + 4

Loop

Rows("1:2").Select Selection.Delete '刪除原始標(biāo)題行----------代碼結(jié)束---------- 使用方法：錄制宏-然后編輯宏輸入以上代碼。