In Word (2013), I'm trying to write a macro that will insert a footnote and then send the keystrokes, "Alt + 0."

The footnote is no problem. But I can't, for the life of me, figure out how to get the macro to send the Alt + 0 keystrokes.

The closest I came was

With Selection
With .FootnoteOptions
.Location = wdBeneathText
.NumberingRule = wdRestartContinuous
.StartingNumber = 1
.NumberStyle = wdNoteNumberStyleArabic
.LayoutColumns = 0
End With
.Footnotes.Add Range:=Selection.Range, Reference:=""
End With
InputSimulator.SimulateModifiedKeyStroke = (VirtualKeyCode.MENU + VirtualKeyCode.VK_U)

And it's kicking out an error "Run-Time Error 424) Object Required.

I've tried moving the last line of code up before "End With" I've also tried running it in its own "With Selection" (although, since it is only kicking off a command line to open up Endnote citations within Word, I'm not sure I need "With Selection.")

Any help would be appreciated.

 

I don't think you're doing that quite right. InputSimulator isn't something you can reference in VBA, it's a C# library.

SendKeys "%0"
will send Alt-0.

 

. . . you were being nice. I wasn't doing it right at all, but thanks! About the same time I saw this, I realized I was using two different templates and the macros I was trying to call, but couldn't find, were simply on another template. So, once I switched over to look at them, I could pull them up and use them.

Turns out, all I needed was:
Application.Run "ENfindCitations"

That, added to the rest of the macro, lets me hit a hotkey and now put in both the footnote and the citation in one process.