Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 12-28-2023, 06:53 AM
brent chadwick brent chadwick is offline Macro to insert author bio as first footnote Windows 8 Macro to insert author bio as first footnote Office 2013
Advanced Beginner
Macro to insert author bio as first footnote
 
Join Date: Mar 2015
Posts: 86
brent chadwick is on a distinguished road
Default Macro to insert author bio as first footnote

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?
Reply With Quote
  #2  
Old 12-30-2023, 08:26 AM
Charles Kenyon Charles Kenyon is offline Macro to insert author bio as first footnote Windows 11 Macro to insert author bio as first footnote Office 2021
Moderator
 
Join Date: Mar 2012
Location: Sun Prairie, Wisconsin
Posts: 9,140
Charles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant future
Default

You might want to save what you want in the footnote as AutoText and insert that rather than having the text in your macro.

You would want your selection to move to the start of the document.

I do not know that you can have both symbol and number footnotes in the same document. The number is inserted because of your footnote option settings.


As a workaround, consider inserting your text as a first-page footer?
Reply With Quote
Reply



Similar Threads
Thread Thread Starter Forum Replies Last Post
Macro to insert author bio as first footnote Macro to change font size of Footnote Reference in Footnote Text TheBigBoss Word VBA 5 06-10-2022 06:14 AM
Macro to insert author bio as first footnote Footnote extraction macro [Why is this macro so slow? / anyway to make it faster?] Le_Blanc Word VBA 10 03-22-2021 11:38 AM
VBA macro to change author name in tagged comments, then delete the tags mjt Word VBA 0 01-28-2021 08:48 AM
Macro to insert author bio as first footnote VBA code for Microsoft Word macro — select text and insert footnote ndnd Word VBA 10 01-06-2015 01:47 PM
Macro to insert author bio as first footnote Insert a footnote in PPT 2010 YooNaa Kim PowerPoint 1 06-17-2012 12:04 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 02:58 AM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft