开发“坐标标注”程序遇到的问题

CQBOY

各位大虾，我用VBA开发了一个坐标标注程序，但我想在工具栏上建立一个按钮来快捷操作，但是在创建工具栏时，坐标标注程序对应的宏的名称（代码中问号处）小弟不知填入什么？希望各位发扬武林精神拔刀相助！！！源代码如下：
Dim currMenuGroup As AcadMenuGroup
Set currMenuGroup = ThisDrawing.Application.MenuGroups.Item(0)

'创建工具条
Dim toolbar As AcadToolbar
Set toolbar = currMenuGroup.Toolbars.Add("toolbar")

'创建按钮
Dim button As AcadToolbarItem
Dim openMacro As String

'给宏赋值
openMacro = Chr(3) + Chr(3) + Chr(95) + "？" + Chr(32)
Set butoon = toolbar.AddToolbarButton("", "坐标标注", "坐标标注.", openMacro)

efan2000

可以创建一个模块，在这个模块中创建一个过程，过程中调用上面的例程。那么宏的代码是这样子的：_-VBARUN 模块名称.过程名称

thankyou

你在LISP定义的命令名，OK！

macula

写一个lisp函数运行VBA过程，然后在工具栏上调用这个lisp函数