电脑上安装了wps，就不能使用word报表。上次有个帖子能解决这个问题，这是哪个帖子？
这个？http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=187175
Dim app As New MSWord.Application
Dim eApp As New MSExcel.Application
app.DisplayAlerts = False
eApp.DisplayAlerts = False
Try
Dim doc = app.Documents.Open(str)
If app.ActiveWindow.Selection.Find.Execute("table") Then
Dim Wb As MSExcel.WorkBook = eApp.WorkBooks.Open(ProjectPath & "Reports\报表.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("e-to-w") '指定要复制的工作表
Ws.UsedRange.Font.Size = 12
Ws.UsedRange.Copy
app.ActiveWindow.Selection.paste
app.Visible = True
End If
Catch ex As exception
msgbox(ex.message)
app.quit
Finally
eApp.quit
End Try
这是代码，有下面这个提示
.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2022.8.18.1
错误所在事件：自定义函数,e-w
详细错误信息：
调用的目标发生了异常。
无法将类型为“Microsoft.Office.Interop.Excel.ApplicationClass”的 COM 对象强制转换为接口类型“Microsoft.Office.Interop.Excel._Application”。此操作失败的原因是对 IID 为“{000208D5-0000-0000-C000-000000000046}”的接口的 COM 组件调用 QueryInterface 因以下错误而失败: 加载类型库/DLL 时出错。 (异常来自 HRESULT:0x80029C4A (TYPE_E_CANTLOADLIBRARY))。
卸载干净office，然后重装office，如果还不行，只能卸载wps了