Hey Guys,
I have a lot of docs that I have to insert author bio into. I would like to insert this info in place of the first footnote with an asterisk (or some other symbol). All of the macros I have looked at online insert both the symbol and a number, which I don't want. Here is the code I use presently to insert footnotes:


[ Sub InsertFootnote()
'Insert NGSQ style Footnote
ActiveDocument.Footnotes.Add Range:=Selection.Range
With Selection


.Paragraphs(1).Range.Font.Reset
.Paragraphs(1).Range.Characters(2) = ""
.Characters.First.Previous.InsertBefore vbTab
.InsertAfter ". " & vbTab
.Collapse wdCollapseEnd
End With
End Sub]


Suggestions on how to modify this code?