Hello Paul, sorry for highjacking this thread, but where does the line
Code:
Rng.Start = Rng.Paragraphs.First.End
need to go? I tried it like this
Code:
If .Find.Found = True Then
Set Rng = .Duplicate
Rng.Start = Rng.Paragraphs.First.End
Set Rng = Rng.GoTo(What:=wdGoToBookmark, Name:="\HeadingLevel")
MsgBox Rng.Text
End If
and get the error "Object does not support this property or method".
If I comment out the line, the message box shows the text including the heading. I'm using Word 2016 via O365.