Automatische opsommingstekens in WordXP programmeren

[Ciska Gorter]

Wij willen graag de Builtinbutton van het opsommingtekens in WordXP programmeren.

Bij de eerste klik moet er een - streepje worden getoond en 0,5 cm verkeerd-om worden ingesprongen
Bij de tweede klik moet er een * worden weergegeven en 1 cm verkeerd-om worden ingesprongen.
Bij de derde klik moet het standaard opmaakprofiel worden weergegeven (dus geen opsommingsteken meer)
Voorbeeld:

- tekst (verkeerd-om inspringen 0,5 cm)
- tekst
* tekst (verkeerd-om inspringen 1,0 cm)
* tekst
tekst

Wie heeft hiervoor een VBA module

alvast bedankt