如果电脑没有安装OFFICE软件，只安装WPS软件，如何将临时表数据导出到WPS（像导出到Excel一样）?
Local lerr_pd
lerr_pd = .F.
On Error lerr_pd = .T.
Wps = Createobject("kwps.application")
On Error
If Lerr_pd = .T.
    = Messagebox("WPS对象创建失败，程序将中止！",16,'系统提示')
    Return .F.
Endif
Wps.Visible=.T.
Wps.Workbooks.Add
Wps.Worksheets("sheet1").Activate
Wps.Caption="VFP调用WPS"
Wps.cells(1,4).Value="第1行第4列"

上面代码到 Wps.Workbooks.Add 时报错。

"et.application"之前试过了，不行，直接捕捉到错误，创建对象失败！
是不是跟WPS的版本也有关系？

[此贴子已经被作者于2021-11-4 14:40编辑过]

管理员模式启动也不行；Wps = Createobject("kwps.application")可以创建对象，但无法添加“sheet1表”

[此贴子已经被作者于2021-11-4 14:59编辑过]

WPS2019,win7 32位 系统

感谢指导！

试了下，安装VBA库，也不行。