Text Cursor in Writer - Find if Number Format

[LtlBear]

Hi all,

I have a Macro that uses the text cursor to go through a word document looking for Paragraph Marks and does some work if it finds one. However, I want it to not run if what follows is text that is in a bullet or number format. I can't figure out how to determine this, though. Anyone provide some help?

Dim objDoc as object
Dim oVC as object

objDoc = ThisComponent
oVC = objDoc.CurrentController().getViewCursor()

Do While oVC.goRight(1,true)
If Asc(oVC.String) = 13 Then ' Need code to decide if what follows is number format
' Do Something
End If
Loop


When I step through my code and check the writer document, the .goRight selects the Paragraph Mark and the following number. However, oVC.CharStyleName and oVC.ParaStyleName are blank.
_________________
-Bear

[JohnV]

The are various ways of numbering paragraphs but I think you are interested in those created with the numbering or bullet icons.

A Text Cursor knows how to "gotoNextParagraph" so I have used one instead of the View Cursor.

[LtlBear]

Thanks. The Text Cursor Object worked for me. I had to rethink my code, but was able to make it work with that object over the View Cursor Object.
_________________
-Bear