EXCEL表格加载项怎么导出

1.请问一下,excel中加载项是怎么弄的啊,请参考图片

如下代码，是我在自己的EXCEL的VBA开始的工具中用到的代码，请参考。

'在excel应用程序的工具栏上添加一个菜单按钮，指定宏运行追加生产顺序的文本框Public Sub MakeMacroButton(ByVal ButtonID As Long, ByVal FaceID As Long, ByVal MacroName As String, ByVal ButtonName As String) On Error Resume Next Dim B As Boolean Dim CBC As CommandBarControl '生成生产顺序的文本框按钮 B = True For Each CBC In Application.CommandBars("Worksheet Menu Bar").Controls If Val(CBC.Tag) = ButtonID Then CBC.Delete B = Not (Err.Number = 0) End If Next If B Then Set CBC = Application.CommandBars("Worksheet Menu Bar").Controls.Add() CBC.FaceID = FaceID CBC.Caption = ButtonName CBC.TooltipText = CBC.Caption CBC.OnAction = MacroName CBC.Tag = ButtonID End If Set CBC = NothingEnd Sub。