---

Ich brauche für eine Stücklistenfunktion eine Verbindung von AutoCAD (VBA) zu OpenOffice Calc.

Eine grundsätzliche Verbindung steht mittlerweile über diesen Code:

Public Sub ootest()
    Dim oServiceManager As Object
    Dim oDesktop As Object
    Dim oCalcDoc As Object
    Dim V As Object
    Dim ooApp As Object
    Dim cell As Object
    Dim r As Object

    Set oServiceManager = CreateObject("com.sun.star.ServiceManager")
    Set oDesktop = oServiceManager.createInstance("com.sun.star.frame.Desktop")
    Dim aNoArgs()
    Set oCalcDoc = oDesktop.loadComponentFromURL("private:factory/scalc", "_blank", 0, aNoArgs)
       
    Set V = oServiceManager.DefaultContext.getValueByName("/singletons/org.openoffice.vba.theGlobals")
    Set ooApp = V.Application
   
    Set cell = ooApp.activecell
    cell.Value = "Hello!"
    Set r = ooApp.Range("B1", "B1")
    r.Value = "Hi1"

End Sub

Leider bietet das ooApp Objekt keinerlei Hilfe, so dass ich die verfügbaren Eigenschaften, Methoden und Ereignisse nicht weiss.
Gibt es irgenwo sinnvolle Beispiele oder eine Dokumentation für die Verbindung AutoCAD zu Calc.

Interessant wären folgende Funktionen:
- Arbeitsblätter hinzufügen
- Bereiche mit Namen versehen
- Zellen formatieren (Farbe, Rahmen)
- Zeilen / Spalten sortieren
- Formeln definieren
- Autofilter definieren

Wäre super, wenn jemand schon etwas Erfahrung hat und mir da auf die Sprünge helfen kann.

Vielen Dank vorab

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP