Guten Tag zusammen
Habe ein merkwürdiges Problem. Ich habe ein VBA-Makro in Excel geschrieben, in dem man verschiedene Word-Dokumente auswählen kann. Die ausgewählten Dokumente werden dann von Excel aus geöffnet, ausgefüllt und als PDF abgespeichert. Nun bis jetzt habe ich in der Testumgebung gearbeitet.
Heute habe ich das ganze in den Ordner auf das System kopiert wo es nacher auch genutzt wird..
Nun bekomme ich plötzlich in einem der Word Dokumente den Fehler vba "Run-time Error '429': Activex component can't create object". Ich habe jedoch an dem Dokument absolut nichts geändert und am alten Speicherort hat alles funktioniert.
Steh grat auf dem Schlauch, kann mir jemand weiterhelfen??
Hier der Code der den Fehler produziert, die dritte Zeile mit "oXML.LoadXML...." zeigt den Fehler an.
Public Sub Server1()
Set DMIService = New DMIService
Set oXML = CreateObject("msxml2.DOMDocument")
oXML.LoadXML DMIService.execute(Webservice, "Connection_GetSettings", "RMWS_RegistrySoap", "")
ActiveDocument.Bookmarks("Text1").Select
Selection.Text = oXML.SelectSingleNode("/Connection_GetSettings/Connection/UserName").Text
ActiveDocument.Bookmarks("Text2").Select
Selection.Text = oXML.SelectSingleNode("/Connection_GetSettings/Connection/Database").Text
ActiveDocument.Bookmarks("Text3").Select
Selection.Text = oXML.SelectSingleNode("/Connection_GetSettings/Connection/Server").Text
ActiveDocument.Bookmarks("Text4").Select
Selection.Text = oXML.SelectSingleNode("/Connection_GetSettings/Connection/Provider").Text
End Sub
Erst habe ich gedacht es liegt an der fehlenden Referenz "Microsoft XML, v6.0", leider war es das nicht..
MFG Luca
|