Number inside circle

[Brian Joseph]

Is it possible to create a Number inside a circle. The result should be font
type and size sensitive. I'm looking for a solution a bit more elegant than
say drawing a circle and then putting a text box inside the circle
containing the number.

Brian
Bristol

 

[Suzanne S. Barnhill]

You could look at the Enclosed Alphanumerics subset of Arial Unicode MS.
These are scalable, but (a) would not match a given font, and (b) can't be
used for automatic numbered lists.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://www.mvps.org/word
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Klaus Linke]

You could look at the Enclosed Alphanumerics subset of Arial
Unicode MS. These are scalable, but (a) would not match a
given font, and (b) can't be used for automatic numbered lists.

Small correction to (b): They can be used in a style that's linked list
template (= outline numbered).

To change the style:
With the cursor in a paragraph of that style, run the macro code

With Selection.Style
.ListTemplate.ListLevels(.ListLevelNumber).NumberStyle _
= wdCaptionNumberStyleNumberInCircle
End With

In Word2000, I can't select this kind of numbering from the user interface.
Though it might be possible in some language versions -- I'm using German.

But another drawback is that even large Unicode fonts like "Arial Unicode
MS" only contain circled numbers up to 20.

Above that, the numbers will appear without circle.

Greetings,
Klaus

 

[Klaus Linke]

I should have properly used the constant wdListNumberStyleNumberInCircle
instead of wdCaptionNumberStyleNumberInCircle (though they are the same
value, 18).

Most other possible wdListNumberStyles are available from the user
interface, or refer to Asian, Hebrew, Arabic, ... numbering systems.

I can see only three others that might be of interest for Latin numbers, and
aren't available from the user interface:

-- wdListNumberStyleGBNum1 for 1. 2. 3. -- though you could get much the
same result with a dot in the numbering format,
-- wdListNumberStyleGBNum2 for (1) (2) (3) -- though you could get much the
same result with parentheses in the numbering format, and
-- wdListNumberStyleArabicLZ (for numbers that are spaced far apart).

BTW, I just noticed that the numbering for cardinal text, ordinals, ...
depends on the language formatting.
So if you format a list numbered "First Second Third ..." in French, you get
"Premier Deuxième Troisième ...".

Wasn't aware of that before :-o

Greetings,
Klaus

 

[Klaus Linke]

And another thing I just discovered:
The numbers appear for me (Word2000, German) even if the style's font
doesn't contain the circled numbers (such as "Arial" or "Times New Roman").

Word seems to use "MS Mincho" or "Arial Unicode MS" if the style's font
doesn't have the necessary characters, maybe depending on the font being
"serif" or "sans serif".
You can change which Unicode font is used with something like
ActiveDocument.Styles("List Number").Font.NameFarEast="Arial Unicode MS"

The large Unicode font still has to be installed.
Nevertheless, this behaviour is pretty neat, since you don't have to use the
Unicode font for the style itself.

Klaus