getting parafraph properties

[Ian]

I need to know if the paragraph i have selected in a
tables cell is bulleted at all, and with a particular
bullet?

By recording a simple macro and looking at it i got an
idea but there is too much there and it is on setting
properties not getting them.

can u help
Ian

 

[Helmut Weber]

Hi Ian,
working with listparagraphs and bullets is a rather
complicated matter. AFAIK, there is no difference,
whether the paragraph is in a table or not.
The following might show you a possible way:
Selection.Range.ListFormat.ListType is equal 0,
if it isn't a listparagraph.
AscW(Selection.Range.ListFormat.ListString)
returns the character number of the liststring
e.G. -3913 (Unicode), I think.
Add 4096 and you get the asc-value 183!
Greetings from Bavaria, Germany
Helmut Weber
"red.sys" & chr$(64) & "t-online.de"
Word 97, NT4.0

 

[Ian]

thanks Helmut this works great...
If Selection.Range.ListFormat.ListType = 0 Then _
MsgBox "No Bullet" Else MsgBox "Bulleted"
Selection.MoveDown Unit:=wdParagraph, Count:=1

***but now, this problem...

when i MoveDown in the table it goes to the cell
on the right then off the table row, before the next lower
cell.

how do i sellect the cell and movedown or movedown a cell?
i've tried Selection.MoveDown unit=wdcell, but it didn't
move???
i've tried
Selection.SelectCell
Selection.MoveDown
but whilst works sometimes jumps cells other times???
usually jumps the cell i'm after
(a large table cell with several bulleted paragraphs)
BUT only/usually on the first run???How unpredictable??

When i get the code working it will run a basic
form that will .find a title eg"WMS3.4" in a table
move down 4 cells to the bulleted paragraphs and
place them in a list box for selection.
I've got the form running with list boxes
I've got the .find working for the title
As the tables are two columns and info is in both sides
eg.

________________________
| WMS2.4 | WMS3.4 |
------------------------
|..........|...........|
|..........|...........|
|..........|...........|
_______________________
| bulleted | bulleted |
|paragraphs|paragraphs |
------------------------
I need to move down under WMS3.4?
some of the other cells have paragraphs in them.

I'm only want to "move down 4 cells to the bulleted
paragraphs"

Hope you can help, and that it is not too busy for you.
Thanks again Ian
PS just thought might try count=3???But simple code may be
better?