VBA按钮使用其私有子

Question

也许有这样的问题，但我找不到它，我没有太多时间。如果我重新回答某人的问题，我很抱歉。

所以我在＆＃34; Sheet1＆＃34;中有一个按钮。此按钮具有Private Sub CommandButton1_Click（） - ＆gt;

Private Sub CommandButton1_Click()
    UserForm1.Show
End Sub

我想将按钮复制到Sheet2（此工作表已经存在）到我选择的单元格中（例如B5），并且按钮与原始单元具有相同的Sub，以便在我单击时打开UserForm1 。

Answer 1

只需在工作簿表单上复制并粘贴按钮，并让它们始终运行相同的宏，您必须为按钮分配一个宏，以限定它所在的模块名称

例如，您的Private Sub CommandButton1_Click()应该驻留在Module1中，然后是您：

• 右键单击按钮

• 选择＆＃34;指定宏＆＃34; （或喜欢 - 我没有英文UI）

• 在＆＃34;宏名称＆＃34;文本框输入：

  Module1.CommandButton1_Click

• 按＆＃34;确定＆＃34;

现在您可以复制任何其他工作表中的按钮