Determine if a Phrase is on a Line by Itself

scienceguy · #1 06-06-2020, 03:16 AM

Hello,

I am trying to determine by code if a phrase is on a line by itself. The phrase will be “QUESTION n”, where "n" is a number, and the phrase is on a line by itself. Sample text would look like:

QUESTION 1
What is the distance between the earth and the moon?

I can use “. MatchWildcards” to find the phrase, Question n, with no issues:

Code:

'total QUESTIONS
Dim wdApp As Object
Dim wdDoc As Object
Dim intQuesCount As Integer
Set wdApp = CreateObject("Word.Application")
wdApp.Visible = False
Set wdDoc = wdApp.Documents.Open(FileName:="C:\Users\roy\Desktop\sample.docx", AddToRecentFiles:=False, Visible:=False)
intQuesCount = 0
Set oRng = wdDoc.Range
With oRng.Find
    .Text = "<QUESTION [0-9]{1,}"
    .MatchWildcards = True
    .MatchCase = True
    While .Execute
        intQuesCount = intQuesCount + 1 'count the number of occurrences
    Wend
End With
MsgBox "There are " & intQuesCount & " occurrences."

It appear that using “^p” to find a paragraph mark is not compatible with “.MatchWildcards”. So, how do you determine if your found phrase is on a line by itself? Many thanks any advance for guidance!

Thanks,
Roy

gmayor · #2 06-06-2020, 04:38 AM

Use ^13 instead of ^p with wildcards - Replace using wildcards

scienceguy · #3 06-06-2020, 04:58 AM

Ah, so simple! Thanks, Graham!

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
how to determine the exact middle point of a line in a shape?	blackroz	PowerPoint	8	11-05-2015 10:38 AM
Underlining a Phrase causes the whole document to be underlined	goldye	Word	1	01-28-2015 02:08 PM
Insert <tab> in a phrase with condition	kjxavier	Word	1	08-01-2014 08:57 PM
Exclude phrase from email	kiwiora	Outlook	2	07-16-2012 03:03 PM
How to find exact phrase	CabbageTree	Outlook	2	05-14-2012 11:24 AM