返回值或从Excel用户表单中取消

Question

我有一个调用用户表单来显示的子窗体，并且只有在用户没有单击我的取消按钮时才希望继续。我不想把所有其他子调用都放在userform中。

是否有可能让用户表单返回一个值或一种方法来检查用户是否单击了特定的按钮?

我想我可以使用全局变量，但我想知道我是否可以传递东西到和从用户表单

Answer 1

我更喜欢使用属性。

在你的userForm

Private m_bCancel As Boolean
Public Property Get Cancel() As Boolean
    Cancel = m_bCancel
End Property
Public Property Let Cancel(ByVal bCancel As Boolean)
    m_bCancel = bCancel
End Property

取消按钮代码

Private Sub cmdCancel_Click()
    Me.Cancel=True
    Me.Hide
End Sub

像这样从外部调用userForm

sub loadForm()
dim frm 
set frm= new UserForm1
frm.show
if frm.Cancel then
   Msgbox "Cancelled"
end if
End Sub