在Excel表格中使用VBA点击按钮

Question

我需要通过VBA代码在Excel表格上点击一个按钮(FormControl)，并运行与其关联的宏。

我尝试了这里所建议的方法 https://stackoverflow.com/questions/130166/clicking-command-button-from-other-workbook 但对我不起作用。

是否有其他方法可以实现？

- user1702478

---

为什么不行？有什么问题吗？有错误吗？ - rene

Answer 1

相对容易的方法，即使没有详细记录。

CommandButton1.Value = True

- Tristan Reischl

---

这使我能够在用户窗体上单击一个按钮，该按钮的事件代码为私有。 - Mike

Answer 2

你是不是真的尝试过了？因为你需要的正是建议的内容。

Application.Run Activesheet.Shapes(1).OnAction

- GSerg

Answer 3

如果在工作表中。我以前用过这个，它有效！

Sheet1.CommandButton1_Click

否则

Sheets("Sheet Name").CommandButton1_Click

- Damian

---

不错，它起作用了。但在我的测试中，只有在从_Click子过程中删除Private时才有效。 - sergio trajano

Answer 4

在我的情况下，我需要添加一个按钮，比如在Sheet1上，来调用Sheet2上的CommandButton1的代码。首先，我必须删除CommandButton1_Click()前面的“Private”语句。然后，在调用Worksheets("Sheet2").CommandButton1_Click之前，我必须调用Worksheets("Sheet2").Activate。然后它就可以工作了。您可以添加Worksheets("Sheet1").Activate以返回到原始工作表。所以：

Private Sub CommandButton1_Click()
Worksheets("Sheet2").Activate
Worksheets("Sheet2").CommandButton1_Click
Worksheets("Sheet1").Activate
End Sub

- Stephan