Editing long list format & repeating list text as headings

[Wannabewordwiz]

I have two issues which are sort of interlinked so I will list them together.

The first is to do with numbered list formatting.

I have an outline numbered list in the following format:
1. Summary
(a) Division
(b) xxxx

The a, b, c continues past z and in word automatically becomes aa, bb, cc
but we want it to be aa, ab, ac. Is this possible?

Additionally, is there a code to include in the style or something which
will automatically repeat the primary heading (ie 1. Summary) and/or the
second level heading if appropriate (ie (a) Division) where the item
continues over 1 page?

I do have styles attached to the list - ie 1. Summary has a style attached
to it and (a) Division has a style attached to it which follows the first
numbered style automatically.

Does this make any sense?

So, basically I have a very long list - I need the second and all following
pages to have 1. Summary (cont'd) printed on the them and if appropriate (a)
Division (cont'd) if the text under Division runs over a pagebreak.

I hope someone can help me.

 

[Doug Robbins - Word MVP]

See the item "Generate a number sequence like Excel uses to number columns"
under the Nifty Numbering section of fellow MVP Cindy Meister's website at:

http://homepage.swissonline.ch/cindymeister/index.html

You may be able to make use of a StyleRef field for the second part of your
question.

--
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

 

[Wannabewordwiz]

I'm still confused. I can't get the coding on Cindy's website incorporated
into my list and I think perhaps I'm just having a bad day and missing
something totally obvious.

The code on the website to create a list as aa, ab, ac rather than aa, bb,
cc is:
{ Quote { Set ABC { = { ABC } + 1 } }{ SET ABC2 { IF { ABC } > 26 "{ IF { =
MOD({ ABC }, 26) } = 1 "{ = { ABC2 } + 1 }" "{ ABC2 }" }" "{ ABC2 }" } }{ SET
ABC1 { IF ABC1 < 26 "{ = { ABC1 } + 1 }" "1" } }{ If { ABC } < 27 "{ ABC1 \*
ALPHABETIC }" "{ ABC2 \* ALPHABETIC }{ ABC1 \* ALPHABETIC }" } }

My question - where do I include this text? My numbering is from an Outline
Numbered list and I can't seem to incorporate the code into the list. I've
also tried changing the list rather than using the basic outline numbered
format from the bullets and numbering, I've tried inserting numbering using
ListNum but I can't get this code right either.

Can anyone help me?!?!?!

I've not even tried to sort the second issue since I suspect I will be
incapable of sorting that out if I can't sort out the number issue!!

Thanks for your help in advance

 

[Doug Robbins - Word MVP]

Another way of applying the alphabetical numbering of the form that you want
would be to run a macro containing the following code after selecting all of
the paragraphs to which you want to apply that numbering:

Dim i As Long, j As Long, k As Long
With Selection
For i = 1 To .Paragraphs.Count + Int(.Paragraphs.Count / 27) - 1
j = i Mod 27
k = Int(i / 27)
If k = 0 Then
.Paragraphs(i).Range.InsertBefore Chr(65 + j - 1) & vbTab
ElseIf k = 1 Then
If j = 0 Then
MsgBox i
.Paragraphs(i).Range.InsertBefore Chr(64 + k) & Chr(65) &
vbTab
ElseIf j < 26 Then
.Paragraphs(i).Range.InsertBefore Chr(64 + k) & Chr(65 + j)
& vbTab
End If
Else
If j = 0 Then
MsgBox i - k + 1
.Paragraphs(i - k + 1).Range.InsertBefore Chr(64 + k) &
Chr(65) & vbTab
ElseIf j < 26 Then
.Paragraphs(i - k + 1).Range.InsertBefore Chr(64 + k) &
Chr(65 + j) & vbTab
End If

End If
Next i
End With

If you want the alphabetical numbers inside parentheses, modify the above
lines of code so that there is a

"(" &

between each InsertBefore and the Chr and insert a

& ")"

before the vbTab

InsertBefore "(" & Chr(65 + j - 1) & ")" & vbTab


--
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