Copy styles does not work

[yuraukar]

I am trying to copy styles from one document to another.
Opening Tools/Templates and Add-Ins/Organizer lets me
open the document with the styles I want on the right
side. Then I select all styles there and click
on "<<Copy". Word asks me if I want to overwrite existing
styles, I choose "Yes to All".
However, after this, styles in both document still
differ! Most notably, Heading 1 in the document I copy
from has Left Margin 0cm, while in the document I copy
to, Left Margin is (still) 0.63.

Any ideas?

 

[Graham Mayor]

Margins are not part of the style definitions, but part of the page layout.
There are separately configurable margins for header and body

--
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>
Graham Mayor - Word MVP
E-mail (e-mail address removed)
Web site www.gmayor.dsl.pipex.com
Word MVP web site www.mvps.org/word
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>

 

[yuraukar]

I probably used the wrong word: indentation would be
correct. Heading 1 in the source document has indentation
of 0cm, while after copying, the destination document
still has Heading 1 with Indent 0.63.

 

[Graham Mayor]

I was only able to repeat your problem when the indent in the document had
originally be manually applied and was not part of the paragraph style. The
manual formatting remained after the style had transferred. In that case, I
think you would find the following macro helpful. Run with the cursor in the
errant style.

Sub Reset_Style()
Dim TargetStyle, CurrentStyle As String
Dim aParagraph As Variant
CurrentStyle = Selection.ParagraphFormat.Style
TargetStyle = InputBox("Style Name?", , CurrentStyle)

Application.ScreenUpdating = False

For Each aParagraph In ActiveDocument.Paragraphs
If aParagraph.Style = TargetStyle Then
aParagraph.Reset
aParagraph.Range.Font.Reset
End If
Next aParagraph
Application.ScreenUpdating = True

End Sub

--
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>
Graham Mayor - Word MVP
E-mail (e-mail address removed)
Web site www.gmayor.dsl.pipex.com
Word MVP web site www.mvps.org/word
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>

 

[Charles Kenyon]

Automatic numbering adds another level of complexity.
See: How to create numbered headings or outline numbering in your Word
document

<URL: http://www.shaunakelly.com/word/numbering/OutlineNumbering.html>. This
is based on ...

Word's Numbering Explained

<URL: http://www.mvps.org/word/FAQs/Numbering/WordsNumberingExplained.htm>

How to Create a Template, Part II

<URL: http://www.mvps.org/word/FAQs/Customization/CreateATemplatePart2.htm>

Legal Numbering

<URL: http://www.addbalance.com/usersguide/numbering.htm>

Seven Laws of Outline Numbering

<URL: http://www.microsystems.com/fra_sevenlawsofoutlinenumbering.htm>

The following are some discussions on the Microsoft newsgroups on numbering:

Nightmare on ListNumbering Street <URL:
http://groups.google.com/groups?hl=en&lr=&safe=off&th=9e790fa7ed2886b3,18&ic=1>

The Joy of Lists <URL:
http://groups.google.com/groups?hl=en&lr=&safe=off&th=811287ebce8fc203,15&ic=1>

Relinking ListTemplates <URL:
http://groups.google.com/groups?hl=en&lr=&safe=off&th=2350746054c838e,12&ic=1>

Outline numbering: restart doesn't restart <URL:
http://groups.google.com/[email protected]#p>

Format Doesn't "Hold" <URL:
http://groups.google.com/[email protected]#p>

(above list compiled by Dave Rado, Word MVP)

ListNumbering Street Revisited <URL:
http://groups.google.com/groups?hl=en&safe=off&th=57df77857e4993ce>


Which version of Word are you using?


--

Charles Kenyon

Word New User FAQ & Web Directory:
<URL: http://addbalance.com/word/index.htm>

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide)
<URL: http://addbalance.com/usersguide/index.htm>

See also the MVP FAQ: <URL: http://www.mvps.org/word/> which is awesome!
--------- --------- --------- --------- --------- ---------
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.

 

[yuraukar]

Copying three times finally did the job - thanks. (Weird
behaviour...)