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

Question

我们最近将PC移到了Windows10和Office365上，这似乎已经停止了对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的引用替换为新引用。