Excel VBA自定义对话框取消button代码

我有一个对话框popup单选button，单选button当前运行macros。 但是，一旦我popup对话框，我不能closures它。 我已经添加了一个取消button。 代码如下

Private Sub CommandButton1_Click() Cmd_Cancel End Sub 

如何通过按取消button来closures我的对话框？

Answer 1

在我的表单中，我使用了一个取消button和下面的代码

btnCancel是button的(Name)

 Private Sub btnCancel_Click() Unload Form_Form1 End Sub 

Answer 2

取决于你想要的。 关键字“我”是Form-Object的实际实例。 隐藏它，它仍然在记忆中。 或者卸载它，以杀死它：当它只是隐藏你可以再次显示它.show（从另一段代码…）

 Private Sub CommandButton1_Click() Me.Hide Unload Me End Sub