excel中如何在每一行上面添加两行标题行

有一份学生分数册，现在想加工一下：在每一个学生的成绩一行上面再添加两行标题，第一行是“成绩通知单”几个字；第二行是“姓名 语文 数学 英语 ”等项；
excel文档样式下载：http://www.namipan.com/d/ecb9a055594c687d45f3af22261d476e764136c800540000
xiatong315@163.com

---

按Alt+F11打开VBA编辑器，按Ctrl+R打开工程资源管理器（如已打开则略过）谈丛，右键单击当前工作簿，选择“物拍插入(N)”、“模块(M)”,然后在右侧代码编辑区里把下面的罩侍羡代码贴进去，按F5执行即可
Sub InsertTitle()
Line = 4
While Cells(Line, 1) <> ""
Range(Rows(1), Rows(2)).Copy
Rows(Line).Insert xlDown
Line = Line + 3
Wend
End Sub

授人以鱼，不如授人以渔

---

怎么发给你

---