Question

excel2007用vba在加载项那里添加了一个自定义工具，如何写入代码让它按下去有功能？

Answer 1

一般【加载项】里添加的是xla加载宏，在加载宏里可以事先设计好很多功能（菜单、工具条、按钮）。
不知道楼主说的【自定义工具】是什么意思，如果单单是工具条，还需要添加按钮，如果已经是按钮，只要为这个按钮添加运行代码就可以点击运行了

追问

用vba的什么那个commandbars的add方法 添加了一个自定义工具栏，就是上面的那个加载项选项卡，就可以看到，然后添加了一个按钮，，然后就不懂如何把代码写入那个按钮去。。。

追答

在添加按钮时，可以定义执行的SUB名，然后在模块中加入SUB：
With Button
.Caption = "按钮1"
.OnAction = "MySub"
End With
模块中

Sub MySub
Msgbox "按钮1 Clicked"

End Sub