Footnote question

[Tamir]

Hi,
When inserting a footnote, after the number there is a space charachter. Is
it possible to have a TAB chachter instead? It will help me to set a unified
a hanging indentation for footnotes that have 1 or two digits (i.e. more
than 9).
Thank you,
Tamir



__________ Information from ESET NOD32 Antivirus, version of virus signature
database 4718 (20091227) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com





__________ Information from ESET NOD32 Antivirus, version of virus signature database 4719 (20091227) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

 

[Stefan Blom]

Specify a hanging indent in the Footnote Text style. Then add the following
macro to your document template:

Sub InsertFootnoteNow()
'Code by Dave Rado

ActiveDocument.Footnotes.Add Range:=Selection.Range

With Selection
.Paragraphs(1).Range.Font.Reset
.Paragraphs(1).Range.Characters(2) = ""
.InsertAfter "." & vbTab
.Collapse wdCollapseEnd
End With

'Scroll to the footnote area (code added by Stefan Blom):
ActiveWindow.ScrollIntoView Selection.Range

End Sub

If you also want to intercept the Footnote and Endnote dialog box, duplicate
the macro using "InsertFootnote" as the name of the sub-routine.

For more, see http://word.mvps.org/faqs/macrosvba/UnSuperscptFnotes.htm.

 

[Tamir]

Thank you Stefan,
I am using a customed style for the footnotes (company reqirement...).
How does that affect the macro?
Tamir

Specify a hanging indent in the Footnote Text style. Then add the
following
macro to your document template:

Sub InsertFootnoteNow()
'Code by Dave Rado

ActiveDocument.Footnotes.Add Range:=Selection.Range

With Selection
.Paragraphs(1).Range.Font.Reset
.Paragraphs(1).Range.Characters(2) = ""
.InsertAfter "." & vbTab
.Collapse wdCollapseEnd
End With

'Scroll to the footnote area (code added by Stefan Blom):
ActiveWindow.ScrollIntoView Selection.Range

End Sub

If you also want to intercept the Footnote and Endnote dialog box,
duplicate
the macro using "InsertFootnote" as the name of the sub-routine.

For more, see http://word.mvps.org/faqs/macrosvba/UnSuperscptFnotes.htm.

--
Stefan Blom
Microsoft Word MVP










__________ Information from ESET NOD32 Antivirus, version of virus
signature database 4728 (20091230) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

__________ Information from ESET NOD32 Antivirus, version of virus signature database 4728 (20091230) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

 

[Suzanne S. Barnhill]

You can modify the Footnote Text style in any way required.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

 

[Tamir]

Hi Stefan,
I tried what you suggested but it did not work for me.
I added though the tag <font>...</font> and it did. The text appeared.
Thank you again,
Tamir

Specify a hanging indent in the Footnote Text style. Then add the
following
macro to your document template:

Sub InsertFootnoteNow()
'Code by Dave Rado

ActiveDocument.Footnotes.Add Range:=Selection.Range

With Selection
.Paragraphs(1).Range.Font.Reset
.Paragraphs(1).Range.Characters(2) = ""
.InsertAfter "." & vbTab
.Collapse wdCollapseEnd
End With

'Scroll to the footnote area (code added by Stefan Blom):
ActiveWindow.ScrollIntoView Selection.Range

End Sub

If you also want to intercept the Footnote and Endnote dialog box,
duplicate
the macro using "InsertFootnote" as the name of the sub-routine.

For more, see http://word.mvps.org/faqs/macrosvba/UnSuperscptFnotes.htm.

--
Stefan Blom
Microsoft Word MVP










__________ Information from ESET NOD32 Antivirus, version of virus
signature database 4728 (20091230) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

__________ Information from ESET NOD32 Antivirus, version of virus signature database 4733 (20091231) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

 

[Tamir]

Yes... but I need to gove it a different name. Should I change anything in
the macro because of it?
Tamir

You can modify the Footnote Text style in any way required.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org




__________ Information from ESET NOD32 Antivirus, version of virus
signature database 4733 (20091231) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

__________ Information from ESET NOD32 Antivirus, version of virus signature database 4733 (20091231) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

 

[Stefan Blom]

Footnote Text is the style used for footnote text in Word; you cannot change
that. What you can do is have the macro apply a different style, but that
would be overkill.

 

[Stefan Blom]

In what way did it not work? What went wrong?

Since you are referring to HMTL markup, are you creating a web page?