Add semicolon to the end of points

[Associates]

Hi,

I was trying to add a semi-colon to the end of each bullet/number points in
Word 03.

For example,

1. Monitoring;
2. Co-ordination;
....

Appreciate your help.

Thank you in advance

 

[Shasur]

Here is a hint for you to carry forward

Sub EndPoints_Bullet_List()

Dim oLF As ListFormat
Dim oLst As List
Dim oPAra As Paragraph

For Each oLst In ActiveDocument.Lists

If (oLst.Range.ListFormat.ListType = wdListBullet Or
wdListSimpleNumbering) Then

For Each oPAra In oLst.ListParagraphs
oPAra.Range.Select
Selection.Collapse wdCollapseEnd
Selection.MoveLeft
Selection.TypeText ";"
Next oPAra
End If

Next oLst

End Sub

Cheers
Shasur