Cursor not showing up when running footnote macro

brent chadwick · #1 04-09-2018, 09:01 AM

Hey guys,
I've been using this macro forever in Mac 2011 to insert specific formatted footnotes. It does not work properly in Mac 2016 when I run the macro with a keyboard shortcut-the cursor does not show up anywhere until you click the page somewhere. However when you run the macro from the visual editor it works like it should. Here's the code-

Code:

Sub InsertFootnote()
ActiveDocument.Footnotes.Add Range:=Selection.Range
With Selection
   .Paragraphs(1).Range.Font.Reset
   .Paragraphs(1).Range.Characters(2) = ""
   .InsertAfter ". " & vbTab
   .Collapse wdCollapseEnd
   Selection.MoveLeft Unit:=wdCharacter, Count:=4
   Selection.TypeText Text:=vbTab
  Selection.MoveRight Unit:=wdCharacter, Count:=4
End With
End Sub

Ideas?

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
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
Macro not running on exiting legacy drop down menu.	supremegrandruler	Word VBA	5	12-11-2014 11:14 PM
issue in running macro in mac	expert4knowledge	Word VBA	5	08-13-2014 02:33 PM
Macro to find text only footnote numbers	TimFromPhx	Word VBA	7	04-10-2014 07:05 PM
Running a Macro in a protected form	yessmarie	Word VBA	1	05-25-2012 12:04 AM