How can I not renumber?

[Rog]

I apologize if this is in a faq some or previous thread.

I need to copy numbered items to a new document and have the numbers not
change. I'm refering to sections in a document and need to preserve the
numbers in my comments. For example if the original says "10.2 - The need for
widget" I need to copy that exact line into a new document without
renumbering or reformating.
Can anyone give me some suggestions?

Thanks for any help.

 

[John McGhie [MVP - Word and Word Macintosh]]

Hi Roger:

Well, it may be a FAQ, but it's certainly not obvious or intuitive, and it
can only be done with a macro!

Sub ConvertNumbers()
' Converts all numbers to text
Dim doIt As Integer

doIt = MsgBox("This macro converts all automatic numbers in the document to
text. This is a one-time operation. Are you sure?", vbOKCancel)

If doIt = 1 Then
ActiveDocument.ConvertNumbersToText
MsgBox "All numbering converted to typed text."
End If

End Sub

I apologize if this is in a faq some or previous thread.

I need to copy numbered items to a new document and have the numbers not
change. I'm refering to sections in a document and need to preserve the
numbers in my comments. For example if the original says "10.2 - The need for
widget" I need to copy that exact line into a new document without
renumbering or reformating.
Can anyone give me some suggestions?

Thanks for any help.

--

Please reply to the newsgroup to maintain the thread. Please do not email
me unless I ask you to.

John McGhie <[email protected]>
Microsoft MVP, Word and Word for Macintosh. Consultant Technical Writer
Sydney, Australia +61 (0) 4 1209 1410

 

[Rog]

Perfect.
Thanks !

Hi Roger:

Well, it may be a FAQ, but it's certainly not obvious or intuitive, and it
can only be done with a macro!

Sub ConvertNumbers()
' Converts all numbers to text
Dim doIt As Integer

doIt = MsgBox("This macro converts all automatic numbers in the document to
text. This is a one-time operation. Are you sure?", vbOKCancel)

If doIt = 1 Then
ActiveDocument.ConvertNumbersToText
MsgBox "All numbering converted to typed text."
End If

End Sub

I apologize if this is in a faq some or previous thread.

I need to copy numbered items to a new document and have the numbers not
change. I'm refering to sections in a document and need to preserve the
numbers in my comments. For example if the original says "10.2 - The need for
widget" I need to copy that exact line into a new document without
renumbering or reformating.
Can anyone give me some suggestions?

Thanks for any help.

--

Please reply to the newsgroup to maintain the thread. Please do not email
me unless I ask you to.

John McGhie <[email protected]>
Microsoft MVP, Word and Word for Macintosh. Consultant Technical Writer
Sydney, Australia +61 (0) 4 1209 1410