If the numbers you speak of are in a field, just add the \* Roman switch.
e.g. { QUOTE "1081" \* Roman } results in MLXXXI.
Good luck,
Cooz
--
PS: If this is a satisfying answer to your question and you're logged in via
the Microsoft site, please click Yes to "Did this post answer the question?".
Thanks.
If you are numbering steps I would create an autotext entry using a SEQ
Field with Roman format switch
something like { SEQ myromanseq \* Roman }
many thanks
Phil
Or are you trying to use some kind of cross reference field?
--
Charles Kenyon
Word New User FAQ & Web Directory: http://addbalance.com/word
Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide
See also the MVP FAQ: http://word.mvps.org/FAQs/ which is awesome!
My criminal defense site: http://addbalance.com
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.
"Phil Gearing" <PhilG...@discussions.microsoft.com> wrote in message
news:C69B2921-C552-4F3A...@microsoft.com...
Are you wanting to number items as you type these procedures?
The SEQ field can be used for this. To build a SEQ field, create a
pair of field delimiters by pressing CTRL+F9. Inside the braces type
SEQ and "a unique sequence name"
Example: { SEQ mynumber }
Now right click the field click update field and toggle field codes. A
"1" appears.
If you enter that field again, press CTRL+a to select all fields then
press F9. The second SEQ field produces "2." If you add the format
switch \*Roman to the fields then they produce I and II
If you save the field construction {SEQ mynumber \* Roman } as and
AutoText entry by:
1. Selecting it
2. Pressing ALT+F3
3. Giving it a name
Then you can use the AutoText entry to number a list as you type.
Here are a couple of macros that you coul use to convert existing
arabic numbers to Roman numbers. One simply converts from arabic to
roman the second (called macro) creates a sequenced in roman numbers.
Sub NumberFormatter()
With Selection.Find
.Text = "[0-9]{1,}"
.MatchWildcards = True
While .Execute
'ConvertNumberToRoman Selection.Text
ConvertNumberToRomanSeq Selection.Text
Wend
End With
End Sub
Sub ConvertNumberToRoman(pNum As Long)
With Selection
.Delete
.Fields.Add _
Range:=Selection.Range, _
Type:=wdFieldExpression, _
Text:=Str(pNum) & "\* Roman"
.MoveStart Unit:=wdCharacter, Count:=-1
.Fields(1).Unlink
End With
End Sub
Sub ConvertNumberToRomanSeq(pNum As Long)
With Selection
.Delete
.Fields.Add _
Range:=Selection.Range, _
Type:=wdFieldSequence, _
Text:=Chr(34) & "myseq" & Chr(34) & " \* Roman"
.Collapse wdCollapseEnd
End With
End Sub