如何创建EXCEL按钮？

这个可以设计成打开工作簿就在菜单栏生成一个按钮。
退出工作簿的时候就删除按钮即可。
给你代码参考一下。
'这个是关闭前删除。
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim cmdBar As CommandBar
Dim cmdMenu As CommandBarPopup
Dim cmdBtn As CommandBarButton
Set cmdBar = Application.CommandBars("WorkSheet Menu Bar")
cmdBar.Controls("效率观测器(&X)").Delete
End Sub
'这个是打开的时候生成
Private Sub Workbook_Open()
Dim cmdBar As CommandBar
Dim cmdMenu As CommandBarPopup
Dim cmdBtn As CommandBarButton
Set cmdBar = Application.CommandBars("WorkSheet Menu Bar")
'Set cmdBar = Application.CommandBars(1)
With cmdBar
Set cmdMenu = .Controls.Add(Type:=msoControlPopup, temporary:=True)
With cmdMenu
.Caption = "效率观测器(&X)"
With .Controls.Add(Type:=msoControlButton)
.Caption = "生成(&M)"
.OnAction = "生成"
.FaceId = 185
End With
End With
End With
End Sub
再来一个过程：
sub 生成()
这里写你的功能代码即可达到你的要求。
end sub

“开发工具”--》“插入”打开控件箱，找到“按钮（窗体控件）”，然后在所需要的地方画出该按钮，如后，邮件点击这个按钮，选择“查看代码”，然后在VBA中下列的两条语句之间插入你的代码，保存返回Excel，再点击“开发工具”--》“设计模式”，让“设计模式”不被选中，这样，这个按钮就只能被点击，而不能被删除。

Private Sub CommandButton1_Click()

End Sub