Lotus Notes / Domino Sonstiges > OLE/COM-Programmierung

Notes nach Excel

<< < (4/4)

celsp:
Hallo, ich habe dein Beispiel genau so umgesetzt. Danach kommt die Fehlerausschrift "Die Add-Eigenschaft des AddIns-Objektes kann nicht zugeordnet werden"! Ich habe keine Vorstellung was ich hier noch falsch mache.

Vielen Dank noch für die bisher Unterstützung!!!

jBubbleBoy:
hi,
wie bereits geschrieben, ich hatte das gleiche Problem und gelöst. mein Code dazu:

--- Code: --- Set oAddin = excel.AddIns.Add(eFileName)
excel.AddIns("TeamOffice-Symbolleisten").Installed = False
excel.AddIns("TeamOffice-Symbolleisten").Installed = True

--- Ende Code ---
eFileName ist eine XLA-Datei und wird von mir aus Notes in einen temporären Ordner geschrieben und dann de- und wieder aktiviert. Das deaktivieren hat seinen Grund, ist aber schon zu lange her um den Grund noch zu kennen ;). Und das ist produktiv im Einsatz mit Excel2000 und für 3000 Excelendanwender.

bubble

celsp:
Hallo zusammen,

ich habe nun eine gängige Lösung gefunden. Die Add Methode des AddIn Objektes funktioniert allerdings bei mir nicht, d.h. sie funktioniert nur einmal. Danach kommt eine Fehlermeldung "Add Methode konnte dem AddIn Objekt nicht zugeordent werden" (Ursache unbekannt).

Ich habe das jetzt wie folgt gelöst:

Forall AddIn in objExcel.AddIns
  Select Case AddIn.Name
             Case "atpvban.xla"
                       AddIn.Installed = false
                       AddIn.Installed = true
  End Select
End Forall

Nochmal vielen Dank an alle!

Navigation

[0] Themen-Index

[*] Vorherige Sete

Zur normalen Ansicht wechseln