Error on macro to insert endnotes on Mac

mbk · #1 12-13-2012, 07:18 AM

I use Word 14.2.3 for Mac under OS X 10.7.5 (Lion). I want a macro that inserts an endnote into a Word document, using Arabic numbering. I recorded such a macro, but when I run it keep getting Run-time error '4605' .

Help, anyone?

Here is the code:

Code:

Sub InsertEndnote()
'
' InsertEndnote Macro
'
'
With Selection
  With .EndnoteOptions
    .Location = wdEndOfDocument
    .NumberingRule = wdRestartContinuous
    .StartingNumber = 1
    .NumberStyle = wdNoteNumberStyleArabic
  End With
  .Endnotes.Add Range:=Selection.Range, Reference:=""
End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to convert endnotes in a text doc to Word endnotes?	Dickison	Word VBA	4	10-06-2012 09:11 PM
Macro to insert new page...	samanthaj	Word	17	01-31-2012 01:53 PM
Powerpoint Macro To Insert Objects Sample	lahuva	PowerPoint	0	07-06-2011 10:51 AM
Insert Page Error	nmbrown	Word	1	10-28-2010 10:33 AM
Macro for Picture Insert	rfhall50	Word VBA	2	10-25-2010 12:41 PM