主题：生成的电子表格改变了原来的排序，怎么办？

此主题相关图片如下：01.jpg

 

2、其中“打印”按钮的代码为：

Dim Book As New XLS.Book(ProjectPath & "Attachments\考核工资汇总导出模版.xls")   '打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet.Locked = True '禁止编辑
Sheet(1,2).Value = myDWMC '修改模板,加入制单人信息
Sheet(1,4).Value = CurrentY & "年" '修改模板,加入制单人信息
Sheet(1,5).Value = CurrentM & "月" '修改模板,加入制单人信息
Dim fl As String = ProjectPath & "电子表格\" & "考核工资汇总.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Forms("考核工资汇总表窗体").Close
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

 

3、 Attachments目录下的文件“考核工资汇总导出模版.xls”为：

  

此主题相关图片如下：02.jpg

4、点击“打印”按钮，得到的电子表就变了

 

 

此主题相关图片如下：03.jpg

 

红色圈的部分 所在的行和原来的顺序不同了。

 

请教各位，你们遇到过这个问题么，怎么办？请多多指教！！