I'm trying to devise a code to return a specific character in a specific paragraph. Can someone help? Thanks!
Code:
Sub ChrSix()
'The sixth character in the first word of paragraph 5 is "." (Title.)
With ActiveDocument
If .Paragraphs(5).Range.Words(1).Characters(6) = "." Then
MsgBox "Found"
Else
MsgBox "Not Found"
End If
End With
End Sub