- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]已装WPS,无法启动表格，提示出错，一定要安装Excel吗？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83295)
-- 发布时间：2016/4/6 9:50:00
-- [求助]已装WPS,无法启动表格，提示出错，一定要安装Excel吗？
此主题相关图片如下：error.png
在已经安装了Excel是可以正常启动WPS表格的，但另外2台电脑没有装Excel就提示出错了，到底是哪里出了问题呢？多谢指教！
Dim App As New MSExcel.Application
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("d:\\物料标签.xls")
App.DisplayAlerts=False
Dim dr As DataRow = Tables("送货.送货流水").Current.DataRow
\'Wb.WorkSheets(1).name = Date.Today
Wb.WorkSheets(1).range("AC3").Value = dr("送货日期")
Wb.WorkSheets(1).range("AD3").Value = dr("送货单号")
Wb.WorkSheets(1).range("AH3").Value = dr("订购单号")
Wb.WorkSheets(1).range("AJ3").Value = dr("编码")
Wb.WorkSheets(1).range("AL3").Value = dr("内容")
Wb.WorkSheets(1).range("AM3").Value = dr("数量")
Wb.WorkSheets(1).range("AD15").Value = dr("备品")
Wb.Save()
App.Quit
Dim Proc As New Process
Proc.File = "d:\\物料标签.xls"
Proc.Start()
-- 发布时间：2016/4/6 9:52:00
--
一定要安装 MS Office，尽量不是安装 WPS
[此贴子已经被作者于2016/4/6 9:52:44编辑过]
-- 发布时间：2016/4/6 12:03:00
--
问题已经解决，谢谢！