I am attempting to create an Access database that will populate table fields
based on the search results of current and potential employee resumes. For
example, capturing X # of characters either side of words like "Master's
Degree", or "Military." I already have a similar question out to the Access
group, but started thinking that this would probably need to be a two step
process, starting with seaching a Word or RTF document, somehow saving the
results as *.txt and then importing that into Access.

Re: Searching multiple, though similar documents, for specific text. by Helmut

Helmut
Thu Jul 28 12:19:12 CDT 2005

Hi,

like this:

Dim rDcm As Range ' document's range
Dim rTmp As Range ' a temporary range
Set rDcm = ActiveDocument.Range
Set rTmp = ActiveDocument.Range
With rDcm.Find
.Text = "pro"
While .Execute
rTmp.Start = rDcm.Start - 5
rTmp.End = rDcm.End + 5
MsgBox rTmp
Wend
End With


Greetings from Bavaria, Germany

Helmut Weber, MVP, WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"

Re: Searching multiple, though similar documents, for specific tex by ThePolymathicMonk

ThePolymathicMonk
Thu Jul 28 12:30:01 CDT 2005

Mr. (or should I say Herr?) Weber,

Thank you for the prompt reply...I will definately give that a try...

Sincerely,

KMN

"Helmut Weber" wrote:

> Hi,
>
> like this:
>
> Dim rDcm As Range ' document's range
> Dim rTmp As Range ' a temporary range
> Set rDcm = ActiveDocument.Range
> Set rTmp = ActiveDocument.Range
> With rDcm.Find
> .Text = "pro"
> While .Execute
> rTmp.Start = rDcm.Start - 5
> rTmp.End = rDcm.End + 5
> MsgBox rTmp
> Wend
> End With
>
>
> Greetings from Bavaria, Germany
>
> Helmut Weber, MVP, WordVBA
>
> Win XP, Office 2003
> "red.sys" & Chr$(64) & "t-online.de"
>