分享下只需一个cll文件按需打印行的觉得最好的方式：

1.cell文件要打印行的地方最好不要全删了，留一行，设置好单元格样式（字体、对齐方式、折行自适应等），后面会省一些代码；

 

2.使用CopyRange(开始列，开始行，结束列，结束行)函数，先复制设置好样式的行；

比如复制第8行2到5列，就是CopyRange(2,8,5,8)

 

3.再使用InsertRow（开始行，插入行数，sheet页索引）从开始行（当前复制的行）插入“记录数-1”行；

比如记录数是4行：InsertRow(8,3,0)

 

4.然后在循环里使用Paste（指定列，指定行，粘贴单元格样式，是否等大小粘贴，是否越过空行等）函数粘贴刚才复制的行；

由于插入的话，当前被复制行会往下挪，所以要直接从当前复制行开始粘贴，Paste(2,8,0,1,0)，就会把第2列到第5列单元格（包括样式）复制到当前行，循环每行粘贴一次，4条记录就是4次；

 

5，然后对每行的单元格元素进行赋值即可；

axCell1.S(2, curRow, 0, matname);