Code: Select all
Set rng = Selection.Next(Unit:=wdParagraph, Count:=1)
rng.Collapse Direction:=wdCollapseStart
rng.Select
Perhaps this is something to do with the fact the 'next' parapgraph, the one I want to end up at the end of, is split into four lines by 'shift enter' (new line) characters?? As yet I've not found an elegant way of getting the insertion point to where I want it (so I can insert a bookmark at that point). Instead I've resorted to the crude but effective use of:
Code: Select all
Selection.MoveDown
Selection.MoveDown
Selection.MoveDown
Selection.MoveDown
Any thoughts?
Ken