Vba CommandBar控件onAction获取源代码管理

可能很简单，但我在文档中找不到：

这是创建激发函数的CommandBarControl的代码部分

Set CBarControl = cmbRightClick.Controls.Add(Type:=msoControlButton)
CBarControl.caption = "Open Pat"
CBarControl.Style = msoButtonIconAndCaption
CBarControl.FaceId = 59
CBarControl.OnAction = "=SCOpenPat()"

现在我想知道是哪个控件触发了此操作。因此，当我将此快捷菜单指定给编辑时，我希望SCOpenPat（）知道编辑、其形式及其值

我还试图找出Application.CommandBars.ActionControl某处是否有此信息，但没有成功

---

谢谢你的帮助

谢谢你的帮助，现在我自己发现了

CBarControl.OnAction = "=SCSelectTum([ID])"

这实际上为我提供了所选记录集的ID（连续形式），这足以满足我的所有需要