MSXML2.DOMDocument60崩溃Excel

我写了一个VBAmacros来加载和分析一个XML文件。 这个确切的代码已经运行良好一段时间,但现在它不再运作。 我已经在运行Excel 2013 64位的两台不同的计算机上进行了testing。 它失败的代码如下:

Public Sub RunClashImport() 'This subroutine will import an XML clash report, parse it, and write it to our workbook Dim iRow As Integer 'Get XML file Dim xmlFile As MSXML2.DOMDocument60 Set xmlFile = New MSXML2.DOMDocument60 

如果我注释掉Set命令,代码会继续。 它不会抛出一个错误,它完全崩溃的Excel。 上面的代码是macros启动的地方,在它之前没有运行代码。 我已经设置了MSXML的v6.0的参考

在这里输入图像说明

对于64位Windows操作系统,您应该将msxml6.dll放在C:\Windows\SysWOW64 ,然后通过在命令提示符regsvr32.exe C:\Windows\SysWOW64\msxml6.dll运行此命令从该位置进行注册。

确保以pipe理员身份运行命令提示符。