3.28版模板EXCEL报表出现错误提示

此主题相关图片如下:2010-3-28 21-31-11.png

以前从未有过,不是所有模板EXCEL报表出现错误提示。
1、生成空表
With Tables("总览")
.Select(0 ,0, .Rows.Count - 1, .Cols.Count - 1)
End with
Dim Book As New XLS.Book(ProjectPath & "Attachments\竣工一览表.xls") '打开模板
Book.Build() '生成细节区
Book.Save(ProjectPath & "Reports\竣工一览表.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File =ProjectPath & "Reports\竣工一览表.xls"
Proc.Start()

此主题相关图片如下:2010-3-28 21-59-56.png

2、涉及到
表达式列的报表有的出现一楼的错误提示,连续不断地点击“确定”直到错误提示消失,报表还是能出现。如
With Tables("总览")
.Select(0 ,0, .Rows.Count - 1, .Cols.Count - 1)
End with
Dim Book As New XLS.Book(ProjectPath & "Attachments\设计一览表.xls") '打开模板
Book.Build() '生成细节区
Book.Save(ProjectPath & "Reports\设计一览表.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File =ProjectPath & "Reports\设计一览表.xls"
Proc.Start()
3、例子不太好做
[此贴子已经被作者于2010-3-28 22:18:17编辑过]
我的情况一样,打开报表产生函数错误的提示,连续按两次确定后,报表会正常显示.是一个BUG.