[gelöst] LO-Komponente feststellen

[uroveits]

Hallo,

wie kann ich mittels eines Makro´s die jeweils aktive LO-Komponente (hier: Base) feststellen?

Hintergund: ich möchte, dass ein bestimmtes Makro nicht bei Verwendung von Base ausgeführt wird.

Gruß

Jochen

[F3K Total]

So?

Code: Alles auswählen

Sub Main
    if thiscomponent.supportsservice("com.sun.star.sdb.OfficeDatabaseDocument") then
        msgbox "ich bin ein Datenbankdokument"
    else
        msgbox "ich bin kein Datenbankdokument"
    end if
End Sub

und sinngemäß

Code: Alles auswählen

"com.sun.star.sheet.SpreadsheetDocument" CALC
"com.sun.star.text.TextDocument" WRITER
"com.sun.star.presentation.PresentationDocument" IMPRESS
"com.sun.star.drawing.DrawingDocument" DRAW

HTH Gruß R

[uroveits]

Hallo R,

super. Genau das habe ich gesucht.

Vielen Dank.

Gruß

Jochen