六月丁香五月婷婷,丁香五月婷婷网,欧美激情网站,日本护士xxxx,禁止18岁天天操夜夜操,18岁禁止1000免费,国产福利无码一区色费

學(xué)習(xí)啦>學(xué)習(xí)電腦>工具軟件>辦公軟件學(xué)習(xí)>Excel教程>Excel2007教程>

excel2007中VBA宏代碼制作工資條的方法

時間: 曉生931 分享

  前段時間給大家寫過“如何使用Excel的定位功能快速制作工資條”和“如何制作雙行成績單”這樣的經(jīng)驗,使用了兩種不同的方法。今天,學(xué)習(xí)啦小編就教大家在Excel2007中VBA宏代碼制作的方法(以制作工資條為例)。

  Excel2007中VBA宏代碼制作工資條的步驟如下:

  例如有如下圖所示的工資表。

  在工資表標(biāo)題行上方插入一空行(如下圖所示)。

  選中頂部第一行空白區(qū)域(A1:G1),設(shè)置邊框為上下框線(如下圖所示)。

  單擊菜單欄“工具”—“宏”—“Visual Basic編輯器”或直接按下Alt+F11快捷鍵打開VBA編輯窗口。

  打開的VBA窗口如下圖所示。

  單擊菜單欄“插入”—“模塊”。

  打開模塊,并在模塊中輸入下列代碼:

  Sub 工資條()

  For i = 3 To 48 Step 3

  Range("A1:G2").Copy

  Rows(i).Select

  Selection.Insert Shift:=xlDown

  Application.CutCopyMode = False

  Next

  End Sub

  備注:公式可以根據(jù)實際情況來修改哦。

  保存后,可以單擊“運行子過程”按鈕,就會在每個工資行上添加上標(biāo)題行。

  現(xiàn)在效果如下圖所示。

  刪除掉前三行,最后的效果如下所示。

2021511