Automation Object Error - excel applikation

[Dim LN as unwissender]

Ein freundliches hallo in die Runde, wir sitzen an einem Problem und finden keine Lösung... wie immer

Lotus Notes 8.5.2 Action Code => wird eine Excel Tabelle aus einem Formular geöffnet, mit Daten gefüllt und gespeichert. Das funktioniert bei 5 von 7 Clients , bei 2 Clients kommt die Fehlermeldung:
Automation Object Error.
Der Debugger bleibt an Excel.Workbooks.Open xlFilename stehen und geht nicht weiter.

folgender Auszug aus dem Script soll die Stelle nochmals verdeutlichen:


'Auszug aus Script (Action ExcelNumberInfo)


' Excel Vorlage auswählen und öffnen

   xlFilename = "V:\kennzahl\vorlage\Vorlage.xltx"' This is the Name of the Excel file that will be imported
      Set Excel=CreateObject("Excel.Application.12")

'Excel Vorlage öffnen

      Excel.Workbooks.Open xlFilename
      Excel.visible=True
      Set xlWorkbook = Excel.ActiveWorkbook

'allgemeine Daten

      Excel.cells(3,3).value=docAng.kennzahl(0)
      Excel.cells(4,3).value=docAng.number(0)
' artikel
      Excel.cells(8,3).value="'" & CStr(docResp.Stuecknummer(0))
      Excel.cells(9,3).value=docResp.bezeichnung(0)
      Excel.cells(10,3).value=("nein")
      Excel.cells(14,3).value=CStr(bdat)
      Excel.cells(15,3).value=CStr(docResp.LTLiefdat(0))

'speichern Exceltabelle


   xlfilename="V:\kennzahl\" &docAng.kennzahl(0) & docAng.PRNR(0) & "-"& CStr(x)&".xlsx"
   Excel.activeworkbook.saveas xlfilename
   Excel.quit


        ' nächste kennzahl

         Set docresp=dcAngArtikel.getnextdocument(docresp)

         x=x+1

      Wend

    End If

Bisher geprüft:
Rechte identisch
Installation Excel und Lotus Notes identisch
 
keine Ahnung warum und wieso es hier nicht weitergeht....

 

[Peter Klett]

Was passiert, wenn Ihr an den zwei Clients die gleiche Aktion von Hand macht? Also die xltx-Datei von V: öffnet? Klappt das dann? Falls da eine Fehlermeldung kommt, habt Ihr wohl die Ursache

[Tode]

Die Sache ist ganz einfach: Da fehlt wahrscheinlich der Eintrag für "Excel.Application.12" in der Registry: Entweder ist eine andere (ältere oder neuere) Version von Excel installiert oder die Installation ist fehlerhaft. Grundsätzliche Empfehlung: Excel.Application verwenden statt Excel.Application.XX mit XX = Versionsnummer, da hat man dann meist einen größeren Anwendungsfall abgedeckt, wenn man nicht gerade auf Funktionen genau der Excel- Version zugreift.

Ansonsten: Excel neu installieren oder in der richtigen Version installieren....

In der Registry müsste dann ein Schlüssel unter Computer\HKEY_CLASSES_ROOT\Excel.Application zu finden sein....

[Dim LN as unwissender]

Was passiert, wenn Ihr an den zwei Clients die gleiche Aktion von Hand macht? Also die xltx-Datei von V: öffnet? Klappt das dann? Falls da eine Fehlermeldung kommt, habt Ihr wohl die Ursache

lassen sich von beiden Clients von Hand öffnen, auch ist Excel als Standard Anwendung eingetragen.

[Dim LN as unwissender]

Die Sache ist ganz einfach: Da fehlt wahrscheinlich der Eintrag für "Excel.Application.12" in der Registry: Entweder ist eine andere (ältere oder neuere) Version von Excel installiert oder die Installation ist fehlerhaft. Grundsätzliche Empfehlung: Excel.Application verwenden statt Excel.Application.XX mit XX = Versionsnummer, da hat man dann meist einen größeren Anwendungsfall abgedeckt, wenn man nicht gerade auf Funktionen genau der Excel- Version zugreift.

Ansonsten: Excel neu installieren oder in der richtigen Version installieren....

In der Registry müsste dann ein Schlüssel unter Computer\HKEY_CLASSES_ROOT\Excel.Application zu finden sein....

Ach ja, die .12 ist schon eine Änderung vorher stand nur ("Excel.Application") drin. In der Registry ist alles korrekt eingetragen, CurVer verweist auf =>  Excel.Application.12

Danke eventuell hat noch jemand eine Ideeeeee

[Tode]

Wird möglicherweise der Client an den beiden betroffenen Arbeitsstationen als Admin gestartet? Dann hat Notes nämlich keinen Zugriff auf V... Kannst Du die Excel von V in eine Mail anhängen?

[Dim LN as unwissender]

Wird möglicherweise der Client an den beiden betroffenen Arbeitsstationen als Admin gestartet? Dann hat Notes nämlich keinen Zugriff auf V... Kannst Du die Excel von V in eine Mail anhängen?

Der User hat 2 Anmeldungen (getrennt)
Windofs, Benutzer (normaler Benutzer) mit gemapptem Laufwerk V:\\ und Adminfreigabe auf genau den gewünschten Ordner und Datei.
Notes Benutzer mit diversen Rechten in den einzelnen Masken / Ansichten

Anhängen  an E-mail werde ich heute Abend probieren. melde mich dann Morgen. 

[jBubbleBoy]

Sind diese 2 Problem-Rechner neu mit Windows 10 und vorinstalliertem Office 365?

das wäre mein Tipp

[Dim LN as unwissender]

Sind diese 2 Problem-Rechner neu mit Windows 10 und vorinstalliertem Office 365?

das wäre mein Tipp

Ja das stimmt, 2 neue Rechner W10 und Office 365 vorinstalliert. Office 365 wurde aber nicht installiert sondern MSO 2007 Enterprise. Was wäre die Lösung ?

Super die Idee ist genial

[jBubbleBoy]

ich habe Office 365 deinstalliert, dann ging wieder alles

[Dim LN as unwissender]

ich habe Office 365 deinstalliert, dann ging wieder alles

Ok , muss ich morgen machen 100 Punkte dem Gewinner. Melde mich morgen

[Dim LN as unwissender]

ich habe Office 365 deinstalliert, dann ging wieder alles

kein Office 365 drauf, aber es ist erst mal so, dass es sich um die beiden neuen Rechner handelt....., also weiter suchen.

[jBubbleBoy]

Also ich hatte genau die gleiche VBA-Fehler Situation.
Das Office 365 jetzt als Microsoft App aufgeführt wird ist schon bekannt?

https://www.borncity.com/blog/2018/04/15/office-365-lsst-sich-nicht-vollstndig-deinstallieren/

[Ralf_B]

Bei den betroffenen 2 Clients, können die auch bei Start des Programme die erste Excel Datei nicht öffen oder passiert der Fehler beim 3. 4. 5. ...  Dokument ?

[Dim LN as unwissender]

wird weder die Erste noch weitere geöffnet, bereits mit dem Start der Aktion kommt bei
" Excel.Workbooks.Open xlFilename
   Excel.visible=True"
die Fehlermeldung.

Der Witz ist, eine andere Aktion mit folgendem Script Auszug:
' hier wird die generierte Tabelle lediglich gespeichert
xlfilename="V:\order\" & docAng.PRNR(0) & "-"& Express & "-"& dat &".xlsx"
   Excel.activeworkbook.saveas xlfilename
   Excel.quit
arbeitet ohne Probleme. Hier wird ja auch nicht Set Excel=CreateObject("Excel.Application") gefordert.

Ach ist das alles ein Shit, aber Danke für die Bemühungen.

[jBubbleBoy]

Meine 1. Lösung war Excel einfach zu starten und dann loszulegen, aber auch das kam schnell an seine Grenzen, weshalb ich Office 365 deinstallieren musste.

Bei deinem Script wird die Excel-Instanz immer neu erstellt, um das mit dem Starten zu Testen müsste euer Code auf getObject umgestellt werden oder noch besser zuerst mit getObject holen/prüfen und anschließend mit createObject arbeiten.

[Dim LN as unwissender]

Meine 1. Lösung war Excel einfach zu starten und dann loszulegen, aber auch das kam schnell an seine Grenzen, weshalb ich Office 365 deinstallieren musste.

Bei deinem Script wird die Excel-Instanz immer neu erstellt, um das mit dem Starten zu Testen müsste euer Code auf getObject umgestellt werden oder noch besser zuerst mit getObject holen/prüfen und anschließend mit createObject arbeiten.

Ok werde ich umschreiben und testen, auch Excel schon mal öffnen werde ich machen. Falls mir auch was einfällt melde ich mich :-)

[Dim LN as unwissender]

Nix hat geklappt, die "Office was weiss ich Installationen" sind in den Tiefen der Registry verankert, wir werden den Rechner neu aufsetzen und damit müsste das Problem erledigt sein.
Vielen Dank an alle, die sich bemüht haben eine Lösung zu finden.

LN

[jBubbleBoy]

Was wäre dann anders?

Was mir noch aufgefallen ist, meine Erfahrungen habe ich in einer höheren Notes Version gesammelt bzw. ist die Installation von Notes 8 unter Windows 10 nicht supportet, dafür ist Notes 8 schon zu alt

[Peter Klett]

Habe hier ein 8.5.3 auf Windows 10 (nix produktives, hatte keine Lust, nach dem Update zu suchen). Dort kommt die Fehlermeldung nicht.

Der Rechner kam aber komplett nackt aus dem Karton, es wurde ein Win 10 und ein Office 2019 installiert