Nicolas Mailhot <[EMAIL PROTECTED]> wrote in news:[EMAIL PROTECTED]:
> What is meant is select whole sentence and apply italic+variable > character style, then select greek word in sentence and set greek > language (without loosing the italic+variable styling) > > but you can! Sub SetSwedish dim aLocale as new com.sun.star.lang.Locale aLocale.Language="sv" aLocale.Country="SE" oDoc=thiscomponent otext=oDoc.getCurrentController.getViewCursor().getText oTC=oText.createTextCursorByRange(otext) ' Xray.Xray(oTC) oTC.charLocale=aLocale end Sub if you don't mind Swedish instread of Greek :-) -- Andrew Brown The email in the header does not work. Contact details and possibly useful macros from http://www.darwinwars.com/lunatic/bugs/oo_macros.html --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
