Microsoft Excel CommandBarControl object
I am trying to automate an item on the commandbar "cells" in Microsoft Excel.
I am adding a new item to the menu, and I have some VB code I want it to run when the item is clicked.
Code:
If Not Application.Intersect(Target, Range("F13:F37")) Is Nothing Then
Set ctlTemp = Application.CommandBars("cell").Controls.Add(Type:=msoControlButton, before:=1, temporary:=True)
ctlTemp.Caption = "Search on Assembly #"
ctlTemp.OnAction = "EnterPart"
ctlTemp.Tag = "vlvwiz"
End If
The problem is that in Excel, the OnAction property requires a Macro, not a VB sub/function.
Does anyone know how I could make this Menu Item run my VB code?
Thanks!