二維碼 購物車
部落窩在線教育歡迎您!

兩個(gè)最快捷的工資條制作方法,10秒鐘2000人

?

作者:胡萍來源:部落窩教育發(fā)布時(shí)間:2018-06-13 20:45:22點(diǎn)擊:6715

分享到:
0
收藏    收藏人氣:0人
版權(quán)說明: 原創(chuàng)作品,禁止轉(zhuǎn)載。

小編有話說:聽說很多小伙伴做工資條都是一個(gè)一個(gè)的復(fù)制表頭,這樣真的太浪費(fèi)時(shí)間啦,今天給大家分享兩種最簡單的方式,不管你公司有幾千人,10秒就解決問題!趕緊來學(xué)學(xué)吧!

瓶子在后臺(tái)看到很多小伙伴在問工資條做,那今天瓶子就拋磚引玉,給大家分享兩種方式,如果你還有更簡單的方法,歡迎留言分享!

第一種:添加輔助列

如下圖所示的工資表,瓶子要給每一個(gè)人的工資條上面加一個(gè)表頭,表頭上面還要留一行空白用于裁剪。

我們先在H2、H3單元格手動(dòng)輸入1、2

然后選中H2-H3單元格區(qū)域,將鼠標(biāo)放置在H3單元格右下角,雙擊向下填充。可以看到如下結(jié)果。

ctrl+c復(fù)制區(qū)域,然后點(diǎn)擊H12單元格,按ctrl+V粘貼,得到如下的結(jié)果。

選中數(shù)據(jù)區(qū)域A1-H21,點(diǎn)擊“數(shù)據(jù)”選項(xiàng)卡下的“排序”按鈕。

點(diǎn)擊“主要關(guān)鍵字”后方的下拉按鈕,在下拉菜單中選擇“(列H)”,點(diǎn)擊確定。

可以看到如下所示的結(jié)果。

選中A1-G1單元格區(qū)域,按ctrl+C復(fù)制。

然后選中A2-H20單元格區(qū)域。

按定位快捷鍵ctrl+G,在彈出的對話框中點(diǎn)擊“定位條件”,然后在如下所示的對話框中勾選“空值”。點(diǎn)擊確定。

此時(shí)可以看到所有的空行都被選中了。

ctrl+V復(fù)制,可以看到表頭復(fù)制到了每一個(gè)空行。

然后選中H列,點(diǎn)擊“開始”選項(xiàng)卡下的“全部清除”。

H2I3單元格輸入1。

選中H2-I3單元格區(qū)域,然后鼠標(biāo)放在I3單元格右下角,雙擊填充。

可以看到如下所示的結(jié)果。

選中I列數(shù)據(jù),按ctrl+G快捷鍵,選擇“常量”。點(diǎn)擊確定。

可以看到數(shù)據(jù)被選中了。

單擊右鍵,選擇“插入”。

在彈出的對話框中選擇“整行”。

此時(shí)可以看到每個(gè)表頭前面都有了空行,可用于打印出來后裁剪。

若想給表頭和名字加上邊框,選中整個(gè)表格區(qū)域,點(diǎn)擊“開始”選項(xiàng)卡下的邊框下拉按鈕,在下拉菜單中選擇“所有框線”。

可以看到所有單元格都加了框線。

若想要留白行沒有框線,可以按照前面的定位空值的方式,定位所有空行后,按ctrl+1快捷鍵,彈出設(shè)置單元格格式對話框。在對話框中依次點(diǎn)擊左、中、右三條框線,可去除空白行的三條框線,點(diǎn)擊確定。

最終效果如下所示。

上面的方法比較適用于人數(shù)較少的公司,假如你所在的公司有兩三千人,那就使用下面瓶子給你的萬能模板吧!

第二種:VBA

我們將分別利用兩段代碼來實(shí)現(xiàn)每行員工工資數(shù)據(jù)前插入裁剪行(空行)、插入表頭兩步操作。

ALT+F11快捷鍵,彈出如下圖所示的VBA調(diào)試窗口。

點(diǎn)擊“插入”-“模板”后,頁面如下所示。

在空白處輸入代碼:(注意代碼中所有標(biāo)點(diǎn)符號都是英文標(biāo)點(diǎn)符號

Sub 選定范圍隔行插入一行()

    Dim i As Integer

    For i = 11 To 3 Step -1

        Rows(i & ":" & i).Insert

      Next

End Sub

點(diǎn)擊“運(yùn)行”按鈕。

此時(shí)可以看到表格完成了插入空行操作。

代碼中有很多大家不認(rèn)識(shí)的單詞,但其實(shí)大家只需要明白下面兩排的含義即可。

For i = 11 To 3 Step -1

Rows(i & ":" & i).Insert

上面的代碼含義是:從第11行開始向上插入1行空行(Rows后面的第1個(gè)i和第2個(gè)i相差0,若想插入兩行空行,可將第二個(gè)改為i+1),然后每隔1行(step -1)插入1行空行,直到第3行(TO 3)為止。

下面我們將原先的代碼刪除,再輸入進(jìn)另一組代碼:(注意代碼中所有標(biāo)點(diǎn)符號都是英文標(biāo)點(diǎn)符號

Sub 2行插入表頭()

For i = 20 To 4 Step -2

    Range("A1:G1").Copy

    CellsI,1.Insert

Next

End Sub

點(diǎn)擊運(yùn)行按鈕后結(jié)果如下。可以看到

這組代碼和上面的含義類似,我們只需要理解中間兩行就可以了。

For i = 20 To 4 Step -2

Range("A1:G1").Copy
  cells(I,1).Insert

上面的代碼含義是:從A20單元格cells(I,1),I是行數(shù),1是列數(shù),I等于20的時(shí)候,就是第20行第1列即A20單元格)開始向上插入(Insert)1個(gè)從指定位置(A1:G1)拷貝(Copy)的表頭,然后每隔2step -2插入1個(gè)表頭,一直插入到第4行(To 4)為止。如果是雙行表頭,只需要將A1G1改為對應(yīng)的表頭區(qū)域即可。

好啦,今天的課程就到這里,記著要把VBA萬能模板復(fù)制下來喲!(畢竟瓶子可調(diào)試了兩個(gè)小時(shí)呢?。┐蠹蚁肟词裁唇坛蹋雽W(xué)習(xí)excel哪方面的知識(shí),歡迎留言喲!

本文配套的練習(xí)課件請加入QQ群:316492581下載。

如果您因工作所需使用到Excel,不妨關(guān)注部落窩教育的《一周Excel直通車》視頻課或《Excel極速貫通班》直播課系統(tǒng)學(xué)習(xí)。

 

相關(guān)推薦:

 統(tǒng)計(jì)中國式排名的三種方法,一定有一個(gè)適合你