Hi Mathias, It doesn't work.
2015-07-08 16:04 GMT+08:00 Mathias Röllig <mroellig.n...@gmx.net>: > Hello Hung! > > It should be enough: > > Sub Snippet > Dim oCurrentSelection As Variant > > oCurrentSelection = ThisComponent.getCurrentSelection() > oCurrentSelection.setPropertyValue( "WritingMode", > com.sun.star.text.WritingMode2.TB_RL ) > End Sub > > > Regards, Mathias > > --------------------------------------------------------------------- > To unsubscribe, e-mail: api-unsubscr...@openoffice.apache.org > For additional commands, e-mail: api-h...@openoffice.apache.org > > -- Mark Hung