Updating bibliography edits document Endnote Bibliography style in some documents

[pecksterism101]

Hi - Using X7 and Word 2007 on Windows 7 Pro 32. This issue drives me crazy.

I have a large document consisting of several separate word documents.

Each document is based on the exact same Word Template in which Normal style has Calibri font size 11.

My reference list heading is in a custom style RefList Heading , which specifies following stye as Endnote Bibliography.

No matter what I do, in about half my documents whenever I update the bibliography the Endnote Bibliography style is edited and the font is changed to Times New Roman.

For example, if I delete the bibliography, adding one paragraph (the final paragraph mark) in Endnote Bibliography style after the RefList Heading and then Update Bibliography, then still, I end up in Times New Roman font.

This is infuriating!

In Edit | Output Styles … clicking on Bibliography, then Edit | Font, Size or Style  are all set at Plain.

The only setting under Layout is Hanging Indent applied to all Paragraphs.

Where is the setting that is changing the font???

[pecksterism101]

Thanks so much for replying Leanne. I did read your very thorough tips and tricks document.

I think this will just have to go down in the annals of Word mysteries.

RefList Heading style is just a style I created so that the heading ‘References’ does not appear in my TOC.

Removing it makes no difference.

BTW, I don’t think you can setup a Word style that does not have a following paragraph style, you have to choose something.

My Normal style is 11pt Calibri font.

So with Heading 1 style as my “References” heading followed by the last paragraph in the document in Normal style (paragraph mark selected, Normal re-applied and then to make sure Ctrl+Spacebar to clear formatting), then on updating citations and bibliography  …

I get the same in result: in some documents the bibliography is in Calibri font as expected, in others, it is Times New Roman, and in the latter documents, their Endnote Bibliography style has been edited by Endnote with Calibri font changed to Times New Roman.

I have also tried deleting the Endnote Bibliography style. On updating citations and bibliography this is re-created. It is linked to Normal style, but again, even though the Normal font is Calibri, I get Times New Roman in some documents!

I cannot detect any difference between the documents that exhibit this behaviour and the ones that behave as expected. All are based on the same Word template, and forcing updating of the styles from the template also makes no difference.

I guess it must be some artefact of the particular documents causing this.

In the end I just wrote the following simple macro and assigned a command bar button so I can at least fix it with one click!

Public Sub FixENBiblioStyle()
With ActiveDocument.Styles(“Endnote Bibliography”)
    .Font.Name = “Calibri”
End With
End Sub

[pecksterism101]

I wanted to change the paragraph spacing, but adding that paramater to the above macro just did not work. It would change the very first entry only.

EndNote, in addition to manipulating the EndNote Bilbiography style adds extra styles named Style EndNote Bilbiography (at least it does this in Word 2007 for me!) - and this was causing the problem.

The following macro does work:

Public Sub FixENBiblioStyle()

    Selection.HomeKey Unit:=wdStory, Extend:=wdMove
    Selection.Find.ClearFormatting
    Selection.Find.Style = ActiveDocument.Styles(“EndNote Bibliography”)

    With Selection.Find
        .Text = “”
        .Replacement.Text = “”
        .Forward = True
        .Wrap = wdFindStop
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        'set paragraph spacing
        .Replacement.ParagraphFormat.SpaceAfter = 2
        'set font
        .Replacement.Font.Name = “Calibri”
        
        .Execute Replace:=wdReplaceAll
    End With
    
   'now select the bibliography
   
    Selection.HomeKey Unit:=wdStory, Extend:=wdMove
    Selection.Find.ClearFormatting
    Selection.Find.Style = ActiveDocument.Styles(“EndNote Bibliography”)

    With Selection.Find
        .Text = “”
        .Replacement.Text = “”
        .Forward = True
        .Wrap = wdFindStop
        .Format = True
      
        .Execute Replace:=wdReplaceNone
    End With
    Selection.Collapse wdCollapseStart

   MsgBox “Done!”, vbOKOnly + vbInformation, “Fix EndNote Bibliography Style”
End Sub