Selecting a word before a character to make bold...

[rohit92]

Hey guys,
I think this might help me in the future, but I want to use something like
this for school. Say i have this text:
"dog- an animal that barks
cat- an animal that meows"

So what I want to do is select the words before the "-" to make them bold.
The words dog and cat should be bold. Sometimes i have very large lists to do
this with and it gets annoying to constantly select each word and make it
bold.. So let me know if it is possible.

 

[Doug Robbins - Word MVP]

Select all of the paragraphs and then run a macro containing the following
code:

Dim i As Long
Dim rng As Range
With Selection
For i = 1 To .Paragraphs.Count
Set rng = .Paragraphs(i).Range
rng.End = rng.Start + InStr(rng, "-") - 1
rng.Font.Bold = True
Next i
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

 

[Graham Mayor]

I see we have two threads on the same subject

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>