使用2个子variables

我在excel文件中有20多个子文件，还有一些用户forms。 在一个用户窗体中，有一个取消button，但是我不能在另一个子窗口中使用“if cancel = true”的代码。 我不知道为什么，但它永远不会实现。 所以我认为，如果我可以声明一个variables在用户窗体中是真实的，然后检查另一个子variables，那么可能工作，但不幸的是，我不知道这一点。 在下面你可以find两个代码;

这是用户表单;

Private Sub Sheet_Iptal_Click() Dim Sheet_Iptal As String Sheet_Iptal = True ThisWorkbook.Worksheets("Storyboard").Delete Yeni_Sheet_Adi_Olustur.Hide MsgBox "Islem iptal edildi." Yeni_Sheet_Adi_Olustur.Yeni_Sheet.Value = "" End Sub 

这里是我想检查“Sheet_Iptal”情况的另一个子部分。

 If Sheet_Iptal = True Then ThisWorkbook.Worksheets("Storyboard").Delete GoTo son End If 

我在这里基本上试图实现的是，如果已经使用了取消button，那么去该特定子的“儿子”。 我接受任何build议。

Answer 1

UserForm .Tag属性可以设置为button上的点击事件：

 Private Sub buttonOK_Click() Me.Tag = "OK" Me.Hide End Sub Private Sub buttonCancel_Click() Me.Tag = "Cancel" Me.Hide End Sub 

然后在显示表单后检查它的值：

 UserForm1.Show MsgBox UserForm1.Tag <> "OK"