How I can do numbering of list with own format?

[avkokin]

Hello. That is (http://word.mvps.org/FAQs/Numbering/SeqMacro.htm) code
that allows doing numbered list with next format - 1.
But how I can use other format for numbering list, for example - 1) or
a) etc. Is it possible?
Thank you.

 

[Benjamino5]

avkokin,

In the line:

MyRange.InsertAfter "." & vbTab

You can change the characters after the SEQ field code number. To get "1)
[TAB]", you would replace the period with a ):

MyRange.InsertAfter ")" & vbTab

Obviously, you can make all sorts of changes to that line as needed.

To change the numbering to lowercase letters, you would need to change the
actual SEQ field code itself, in the "MyRange.Fields.Add..." line. Insert the
kind of numbering/lettering before the "\r" switch. For example, "\*
alphabetic" makes lowercase letters:

Text:="SEQ numberedlist \* alphabetic \r"

For the full list of different numbering/lettering options, go to
Insert-->Field. then choose "SEQ" from the list. At the bottom, click the
"Field Codes" button, then the "Options" button that appears. In the dialog
box, you'll see all the options.

Hope this helps,
Ben

 

[avkokin]

avkokin,

In the line:

MyRange.InsertAfter "." & vbTab

You can change the characters after the SEQ field code number. To get "1)
[TAB]", you would replace the period with a ):

MyRange.InsertAfter ")" & vbTab

Obviously, you can make all sorts of changes to that line as needed.

To change the numbering to lowercase letters, you would need to change the
actual SEQ field code itself, in the "MyRange.Fields.Add..." line. Insert the
kind of numbering/lettering before the "\r" switch. For example, "\*
alphabetic" makes lowercase letters:

Text:="SEQ numberedlist \* alphabetic \r"

For the full list of different numbering/lettering options, go to
Insert-->Field. then choose "SEQ" from the list. At the bottom, click the
"Field Codes" button, then the "Options" button that appears. In the dialog
box, you'll see all the options.

Hope this helps,
Ben

Hello. That is (http://word.mvps.org/FAQs/Numbering/SeqMacro.htm) code
that allows doing numbered list with next format - 1.
But how I can use other format for numbering list, for example - 1) or
a) etc. Is it possible?
Thank you.

Ben, Thank you for your help!