VBA - 通过DblClick事件关闭打开的表单,关闭整个运行的代码?

时间:2018-06-14 15:12:47

标签: vba excel-vba class userform excel

我有一个userform和一些文本框,我创建了一个DblClick事件来打开并根据文本框数据填充第二个表单。问题是当我关闭Userform4时,整个运行形式消失了!关闭userform3时没有任何反应。但仍然,鼠标指针显示圆形状态,就像运行代码一样! 我试图将第二种形式的Query_Close事件改为隐藏,但没有运气。你能帮忙吗?第二种形式没有“取消”按钮。

Private Sub txt1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Txt1.Locked = True Then
    With ThisWorkbook.Sheets("target").Range("a1")
        UserForm4.TextBoxJob2 = Txt1.value
        UserForm4.TextBoxBadgeNum2 = .Offset(RowNumber, 3)
        UserForm4.ComboBoxAC2 = .Offset(RowNumber, 0)
        UserForm4.Show
    End With
Else
    UserForm3.Show
End If
End Sub

此致 中号

0 个答案:

没有答案