加载项增加按钮
Private Sub workbook_add()
With Application.CommandBars("standard").Controls.Add
.Style = msoButtonCaption
.Caption = "打印"
.OnAction = "模块1.Macro1"
End With
End Sub
Private Sub workbook_add()
With Application.CommandBars("standard").Controls.Add
.Style = msoButtonCaption
.Caption = "打印"
.OnAction = "模块1.Macro1"
End With
End Sub
**粗体** _斜体_ [链接](http://example.com) `代码` - 列表 > 引用
。你还可以使用@
来通知其他用户。