troubleshooting Question

VBA Word macro - how to get characters after the searched for string

Avatar of fruitloopy
fruitloopy asked on
VBAMicrosoft WordVisual Basic Classic
5 Comments1 Solution1358 ViewsLast Modified:
I am trying to create a macro which will find a reference number in the document and save as a variable but I cannot seem to find out how to do this.
The reference number will always be 5 characters after the word "Reference: " so I am hopefully looking for some simple code allong the lines of:
Content.Find.Text  = "Reference: " + 5

This is my code so far:
Dim c As Range
Dim startword As String
startword = "Reference: "
Set c = ActiveDocument.Content
c.Find.ClearFormatting
c.Find.Replacement.ClearFormatting

With c.Find
.Text = startword
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWildcards = True
End With

c.Find.Execute

Any thoughts?
ASKER CERTIFIED SOLUTION
GrahamSkan
Retired
Join our community to see this answer!
Unlock 1 Answer and 5 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 5 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros