excel vba 用户窗体/按钮编码

Question

我在 Excel 中创建了一个工作簿。为了导航，我插入了一个用户窗体。我有一段代码，一旦在用户窗体上单击按钮，它就会带我进入电子表格。

现在，我想在电子表格上添加一个按钮，用于关闭当前电子表格并将用户带回用户表单，该表单默认为我命名为“主页”的表格。但是，我不知道允许我执行此操作的编码

Answer 1

您的问题令人困惑，可能是因为它是根据你的需要定制的。

但是，我把问题理解为“如何关闭电子表格”，意思是“如何关闭工作表”

你不能，你只能删除或隐藏它。根据你的设置，这可能没问题

删除特定工作表然后选择其他工作表的代码是

Sub EeekPirates()
Application.DisplayAlerts = False   ' this stops the "are you sure message box"
Worksheets("Sheet2").Delete
Worksheets("Sheet3").Activate
Application.DisplayAlerts = True    ' put this back on since it's an application wide change
End Sub

隐藏它的代码

Sub EeekPirates()
Worksheets("Sheet2").Visible = False
Worksheets("Sheet3").Activate
End Sub

两者都存在问题，但正如我所说，没有办法了解您的设置，所以希望这足以让您开始。