Excel 合并“中的两个宏”；工作手册“开放式”；

我完全不熟悉宏，没有其他经验。我不知道如何合并以下两个宏并遇到一些错误

Private Sub Workbook_Open()
    ThisWorkbook.Worksheets("Menu").Activate
End Sub

及

如果有人能告诉我怎么做。任何帮助都非常有用：）

每本书只能打开一个

工作簿

事件，这意味着您有两个选项：

将所有相关代码放入

工作簿\u Open

事件中（请参阅@alowflyingpig的解决方案）或

创建两个（或更多）宏。您的

工作簿\u Open

只需在启动时调用另一个子系统即可。然后，您可以按照自己喜欢的顺序在非事件过程中存放任何系列的代码

---

---

---

请注意，您可以在

工作簿_Open

活动中调用任意多个SUB，只需简单说明SUB名称即可

谢谢您的建议，我尝试了这个！我得到了结果。

Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

Private Sub Workbook_Open()
    ThisWorkbook.Worksheets("Menu").Activate
    Application.Visible = False
    UserForm1.Show
End Sub

Private Sub Workbook_Open()
    Launch
End Sub

Sub Launch()
    ThisWorkbook.Worksheets("Menu").Activate
    Application.Visible = False
    UserForm1.Show
End Sub