我有一个函数可以检查excel配置是英文版还是西班牙文,以设置电子表格的名称。
Public Function VersionExcel(ByVal appxls As excel.Application) As String
Dim Hoja1 As String
'Si aplicacion en ingles
If (appxls.LanguageSettings.LanguageID(1) = 1033) Then
Hoja1 = "Sheet1"
Else
Hoja1 = "Hoja1"
End If
VersionExcel = Hoja1
End Function
它已经工作了近10年,但最近我在执行该代码时遇到了这个错误:
[代码停止] https://imgur.com/ZlQXv0o
[错误讯息] https://imgur.com/BUEYAGA
执行时间“错误'-2147319779(8002801d)'。 对象'_Application'“
的方法'LanguageSettings'错误
在某些电脑上工作,而在其他电脑上则不行。为了得到这个错误,配置Excel会出现什么问题?
我已经检查过引用是否相同。但是我对这个问题感到很疯狂。
答案 0 :(得分:1)
这可能是迟到/早期绑定问题。 如果您的用户具有不同版本的Access,并且开发/编译的版本是更高版本,则早期绑定对象引用将不起作用。
查看https://support.microsoft.com/en-gb/help/245115/using-early-binding-and-late-binding-in-automation以获取更多帮助