修复运行时48错误的移动办公产品

Question

我们最近将PC移到了Windows 10和Office 365，这似乎已经停止了我们已经给出错误的现有VB6项目上的某些编码工作

运行时错误'48'

加载DLL时出错

这里有错误的编码-

Set oXLApp = New Excel.Application

oXLApp.Visible = True

Set oXLBook = oXLApp.Workbooks.Open(ExcelFileName)

Set oXLBook = oXLApp.Workbooks.Add(ExcelFileName)

Set oXLSheet = oXLBook.Worksheets(1)

Answer 1

您需要检查您的引用，并将指向旧excel dll的引用替换为新的dll

Answer 2

嗨，@ eddogordo，这是您的意思吗？