將現有用戶窗體按鈕附加到Excel工作簿工作表

Question

我有一個Excel工作簿，它有一個宏（工作簿中唯一的宏）附加到工作表上的按鈕。

在VB模式下，我使用CommandButton1_Click Sub在Forms下創建了一個UserForm，當從VB（Run> Run Sub / UserForm或F5）中運行時，它運行正常。 我讓它調用Shell命令來運行運行Python腳本的BAT文件。

如何從工作表上的按鈕運行CommandButton1_Click？ 如果我嘗試向工作表添加一個按鈕，它會向我提供已與其他按鈕關聯的宏。

Answer 1

例如，創建一個宏

Sub ShowForm
    YourForm.show
End Sub

並在按鈕中關聯此宏。

Answer 2

為什么不將主代碼移動到新的宏來模塊化它。 然后，您可以通過UserForm和工作表ActiveX（或窗體）按鈕調用您的宏

'Normal Code Module
Sub TestCode()
MsgBox "Hi"
End Sub

'UserForm code
Private Sub CommandButton1_Click()
Call TestCode
End Sub

'ActiveX button code
Private Sub CommandButton1_Click()
Call TestCode
End Sub