主题：[求助]

我在命令窗口中试验了一段典型的用模板创建Excel报表的代码（注释掉的是帮助文件中粘贴来的）： Dim Book As New XLS.Book(ProjectPath & "Attachments\项目开发费用大类分类统计01.xls") Dim Sheet As XLS.Sheet = Book.Sheets(0)     Sheet(3,3).Value = "项目名称:" Book.Build() Dim fl As String = ProjectPath & "Reports\BBB.xls" Book.Save(fl) Dim Proc As New Process '打开工作簿 Proc.File = fl Proc.Start() 'Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls") '打开模板 'Dim Sheet As XLS.Sheet = Book.Sheets(0) 'Sheet(6,6).Value = "制单人:" & User.Name '修改模板,加入制单人信息 'Book.Build() '生成细节区 'Book.Save("c:\reports\test.xls") '保存工作簿 'Dim Proc As New Process '打开工作簿 'Proc.File = "c:\reports\test.xls" 'Proc.Start() 执行代码后报错，不执行（换过好多代码都试过，结果一样）！报错内容如插图，请问问题出在哪里？

上传图片和文件看这里 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

 代码不会有问题。如果出错，只可能是你的文件名写错了，注意后缀是不是.xlsx

　　不好意思，这两天在写输入窗口部分，所以没有及时回复。

　　本来想在表主体解决后，先做报表输出的出口部分（统计分析应该可以在这部分解决），输入窗口和查询窗口部分放到后面来处理，但遇到上述问题，只好先改做入口部分（输入窗口），现在基本解决了，不求专业，只求按工作要求能用。

　　但上面这个问题阻碍了出口的编写，如果不解决，估计前功尽弃。

　　现将程序全部上传，请老师帮看看，问题出在“报表输出”部分，希望是选择了项目后，按项目名称筛选数据，打印输出。代码我检查过应该不会出现后缀.xls写成.xlsx的问题。程序报错后能运行，只是跳过了“报表事件”的那段代码，问题就应该出在“报表事件”的代码上面。

　　谢谢！

 

　　晕死。等了将近20min，也不知道附件上传上来了没有，是“.rar”文件，“上传中，请稍后...”的提示早没有了，但帖子中未出现上传好的文件，浏览器是IE11，只好再把报错的截图插入帖子了，也不知道你们能不能看见插入的".png"图片，但我在帖子中能看见。

  图片上传上来。IE用兼容模式看看。

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

是不是rar文件18M太大了，总是长传不了，试了试把报错的截图作为附件上传，终于提示“1个文件上传成功”，怕再出问题，先发了再说。

原来文件夹里面有其它东东，怪不得这么大，现在好，rar文件上传好了，麻烦帮忙看看。谢谢！

 木有看到你上传的东西。

此主题相关图片如下：aaa.png

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:工程项目数据管理.rar

这次终于看见上传的文件了，应该可以了吧。

 再看了一下，是你的文件名写错了啊，这个你也看不出来？