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

显示全部楼层 · 2009-1-16 17:32:30

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

千问 · 2009-1-16 17:32:30

按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授人以鱼，不如授人以渔...