我给你修改了代码截图如下：

1、模板我修改了，上下部分都只预留了两个空行好处是不用删行，只需要插行：

2、代码我基本上全都是用我自己的方法只有最前面的刪除工作表和中间插入工作表保留了你原来的代码：

有详细解释。为复制方便我把代码粘贴在下面。除了没排版其他与截图完全相同：

Rem 删除工作表，保留了源代码

Rem 从明细表13行开始检索明细数据

x2 = "" '当前生成的明细表名称

If Js1 > 1 Then '判断是否要插行大于1行都要插行，”小计“前保留一個空行会比较美观

明细表中我新插入了一个按钮你原来的代码完全没动，我是在模板2中新增的代码：

1）生成的明细表中有很多不必要的黃色是模板带过来的，修改模版就好了；

2）插入的行没有画表格线你自己添加。先录制宏然后复制进来就好了；

3）关于工作表的选择这是重点要特别注意：

默认活动工作表就是明细表，代码中用x0表示插入工作表、插入行都要转移工作表焦点，后续还是需要再转回原來的x0明细表的所以后面紧接着都有一行worksheets(x0).activate。这行代码的重要意义是能尽量省掉表名前缀比如代码中经常有cells(x,y)的写法，表示数据来源于明细表x0只要不是明细表x0都要带表明前缀，如Worksheets(Worksheets.Count).Cells(Js

4）其他表头细节数据我都没考虑你也没说，自己添加；

市面最高版本品质保证!一样品質，十分之一价格!onbro_onbasketball高端玩家来留着做个对比

Linux小白一枚最近安装centos6.5，研究了好幾天还是没搞明白故来此地发帖求助各位老师，谢谢