代码之家 › 专栏 › 技术社区 › Mahhdy

VBA-通过DblClick事件关闭打开的窗体,关闭整个正在运行的代码?

excel userform class excel-vba vba

0

Mahhdy · 技术社区 · 6 年前

我有一个用户窗体和一些文本框,我创建了一个 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 回复 | 直到 6 年前