How do I get footnotes to look like those in Turabian 7th edition

[Nancy Vyh]

Turabian 7th edition, as well as Chicago Manual 15 want the numbers in the
footnotes to be full size, followed by a dot. However, the footnote numbers
in the text are superscript. How can I get the numbers to be in a different
style?
Chicago and Turabian seem to be working with software other than that used
by students!

 

[Suzanne S. Barnhill]

See http://word.mvps.org/FAQs/MacrosVBA/UnSuperscptFnotes.htm

 

[Nancy Vyh]

This fixed the problem. It is also possible to put only a space instead of a
tab. Now I have to share this with my students! Thanks

 

[Lene Fredborg]

To change the tab to a space, change the InsertFootnote macro as follows:
Replace the following line in the macro:
..InsertAfter "." & vbTab
with
..InsertAfter ". "

(i.e. remove " & vbTab" and insert a space after the period between the
quotes).

However, if you have applied hanging indent to the Footnote Reference style
as suggested in the article, you should keep the tab in order to have the
text in the first line of each footnote aligned to the text in subsequent
lines.

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word

 

[Summer]

Lene,
InsertFootnote does not intercept in 2003 or 2007 of the toolbar command nor
does it intercept in 2007 when using the macro.
It does work in 2003 as it should with Insert Reference Footnote.

Do you know why or is it being "fickle"? I use overtype as an intercept
(I've got text assigned) and it works fine.

 

[Lene Fredborg]

Summer,

Actually, I am not sure which toolbar command you refer to - there may be
one that I have never noticed. In which toolbar?

However, I made a little research (but with a poor result):
If found that the ID of the InsertFootnote command in the Insert menu is
3365. I then tried to use
CommandBars.FindControl(ID:=3365)
to find a control with that ID. I found one with the caption "Note options".
I found a command named NoteOptions and a corresponding constant named
wdDialogNoteOptions (=373). However, if I try to run the code:
Dialogs(wdDialogNoteOptions).Show
nothing happens and if I check the OnAction property of the found control,
it is empty.

On the other hand,
Dialogs(wdDialogInsertFootnote).Show
displays the known dialog box from the Insert menu (wdDialogInsertFootnote =
370).

Searching for VBA help on NoteOptions leads to the help item "Visual Basic
Equivalents N" so mayby NoteOptions if no longer supported and should have
been removed.

I don't know, but my guess is that the command you refer to attempts to
execute the NoteOptions command.

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word

 

[Summer]

It is the InsertFootnote command and it does intercept the macro Footnotes
on the MVP site.

Thank you

 

[Summer]

It is as simple as the naming convention has to be "InsertFootnote" on
toolbar.

Thank you.

 

[Lene Fredborg]

I am glad you found and solved the problem.

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word