enter Bible verse numbers

Kathi,

You really don't need the macro. You can do this using the Find and Replace
utility.

On the Edit menu click "Replace"

In the Find what field type "([0-9])2"
If the Replace with field type "\1"

Click "More" and check "Use Wildcards"

With the cursor still in the Replace with field click "Format>Font" then
check "Superscript" and press "OK"

Click "Replace All"


Kathi wrote:

Greg,

Thank you for attempting to assist me. I have never used macros. I
don't know where or how to place the information you sent me.

Thanks,

Kathi

"Greg Maxey" wrote:

Ok. You want the verse number to appear as superscript. You can do
as Paul suggests, or you could simply type out the verses using
regular numbers and then covert them all in one sweep with the
following macro:

Sub ScratchMacro()
Dim oRng As Word.Range
Set oRng = ActiveDocument.Range
With oRng.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "([0-9]@)"
.Replacement.Text = "\1"
.MatchWildcards = True
.Replacement.Font.Superscript = True
.Execute Replace:=wdReplaceAll
End With
End Sub

Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org


"Kathi" wrote in message
news:

"Greg Maxey" wrote:

Kathi,

Not sure what your question has to do with Word VBA. I am not
even sure I
understand your question. If you are typing verses then I assume
that you
are typing them by pressing one letter key at at a time on your
keyboard. Entering verse numbers is done in a similiar way. One
number at a time.

Kathi wrote:

I have Word 2003. I am typing Bible verses and would like to
include the verse numbers. How do I insert them?

Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org



Greg, I am sorry that I posted in the wrong place. I thought
"programming" meant programming the word document. And no you
cannot insert the verse numbers one number at a time. If this
were the case I wouldn't have be smaller than the letters and sit
not on the line but above the line. Could you please direct me to
the proper sight to post my question.

Thanks,
Kathi

Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org