大家好，今天跟大家分享如何通過錄制宏批量制作個人成績單。
應用案例在下面圖1工作表中每個人的成績上方都插入第一行中綠色底紋的科目名稱，以便制作個人成績單，參考效果見圖2。
圖1
圖2
操作步驟1 選中A1單元格，在“開發工具”選項卡先單擊“使用相對引用”按鈕，再單擊“錄制宏”。
2 在打開的“錄制宏”對話框中，我們可以修改默認的宏名以及快捷鍵，這裡我們将“宏名”設為“個人成績單”，快捷鍵設為“Ctrl Shift M”，單擊“确定”按鈕，就可以開始宏的錄制了。
（說明：快捷鍵的作用是在宏錄制好後，可以通過快捷鍵快速執行宏命令。）
3 在工作表中選中第一行，同時按ctrl c組合鍵進行複制。
4 選中第3行，單擊鼠标右鍵，在彈出的菜單中選擇“插入複制的單元格”。
5 單擊“開發工具”選項卡下的“停止錄制”按鈕，停止宏的錄制。
6 在“開發工具”選項卡單擊“Visual Basic”按鈕。
7 在打開的“Microsoft Visual Basic for Applications”窗口中，鼠标雙擊左側列表中的“模塊1”，即可在右側看到我們剛剛錄制好的宏“個人成績單”。
8 對宏代碼進行如下修改：
Sub 個人成績單()
'
' 個人成績單 宏
'
' 快捷鍵: Ctrl Shift M
'
For i = 1 To 5
ActiveCell.Rows("1:1").EntireRow.Select
Selection.Copy
ActiveCell.Offset(2, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
ActiveCell.Select
Next
End Sub
代碼說明：代碼中新增的内容“For i = 1 To 5”和“Next”代表将前面錄制好的宏重複5次（因為還剩下5個人的成績上方需要複制插入科目名稱）。
9 單擊窗口上方工具欄中方向向右的綠色三角符号（即運行子過程/用戶窗體按鈕），在彈出的“宏”對話框中單擊“運行”按鈕，即可運行修改後的宏代碼。
10 返回工作表，可見剩餘5個人的成績上方也批量添加好了科目名稱。
本文由@靜心辦公原創，歡迎關注留言，一起學習更多office辦公技能！#職場技能##職場加油站##office辦公技能#
,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
