> Come indicato nell'oggetto vorrei inserire tramite macro un elenco
> puntato.
Scusate mi correggo voglio inserire un elenco numerato.
> Il codice che ho scritto è il seguente:
>
> ---------------------------------------------------------------------
> Doc = ThisComponent
> oText = Doc.Text
> Bookmarks = Doc.Bookmarks
>
> Mark1 = Bookmarks.getByName("ImmedEsecut")
> Curs = oText.createTextCursorByRange(Mark1.Anchor)
> Curs.goToEndOfParagraph(True)
> If LTrim(Curs.String) = "" then
> Curs.goRight(1,True)
> Curs.setString("")
> else
> StyleFams1 = Doc.StyleFamilies
> ParaStyles1 = StyleFams1.getByName("NumberingStyles")
> xray ParaStyles1
> DefaultStyle =
> ParaStyles.getByName(com.sun.star.style.NumberingType.ARABIC)
> 'xray Curs
> Curs.ParaStyleName = DefaultStyle
> End If
> ---------------------------------------------------------------------------
>
> Il mio problema è che DefaultStyle =
> ParaStyles.getByName(com.sun.star.style.NumberingType.ARABIC) mi
> restituisce un errore.
>
> Come posso fare?
>
> Grazie
>
> Stefano
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [email protected]
> For additional commands, e-mail: [email protected]
>
>
>
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
