View Single Post
 
Old 04-03-2018, 09:30 PM
teylyn teylyn is offline Windows XP Office 2016
Novice
 
Join Date: Nov 2010
Posts: 2
teylyn is on a distinguished road
Default

I found it. The way it works for me is

Code:
  If .Find.Found = True Then
    Set Rng = .Duplicate
    Set Rng = Rng.GoTo(What:=wdGoToBookmark, Name:="\HeadingLevel")
    Rng.Start = Rng.Paragraphs.First.Range.End
    MsgBox Rng.Text
  End If
The crux was the Rng.Paragraphs.First.Range.End
Reply With Quote