https://bugs.freedesktop.org/show_bug.cgi?id=45892

Beluga <[email protected]> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |[email protected]

--- Comment #24 from Beluga <[email protected]> ---
(In reply to Pierre Farrugia from comment #23)
> sub InsertMathTypeFormulaInWriter
> dim oTargetDocument as variant
> oTargetDocument = ThisComponent
> dim oCurrentController as variant
> oCurrentController = oTargetDocument.getCurrentController()
> dim oFormula as variant
> oFormula =
> oTargetDocument.createInstance("com.sun.star.text.TextEmbeddedObject") 
> oFormula.CLSID = "0002CE03-0000-0000-C000-000000000046"
> oFormula.AnchorType = com.sun.star.text.TextContentAnchorType.AS_CHARACTER
> oFormula.attach(oCurrentController.Selection.getByIndex(0) )
> dim oXCOEO as variant: oXCOEO = oFormula.ExtendedControlOverEmbeddedObject
> oXCOEO.doVerb(com.sun.star.embed.EmbedVerbs.MS_OLEVERB_PRIMARY)
> End Sub

Running this on 4.4 I get

BASIC runtime error.
Object variable not set.

..pointing to the line before End Sub.

-- 
You are receiving this mail because:
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs

Reply via email to