Question

在我的工作簿中，我有一个用户窗体。 UF是开放的，我希望可以在工作表或其他工作簿中进行一些更改。

我尝试过：

Call UserForm1.Show(vbModeless)

和：

UserForm1.Show vbModeless

我也将UF设置由“ ShowModal”更改为False。

但是在所有这三个示例中，UF均已显示并在几秒钟内关闭。因此，我无法在UF中填充TextBoxes。显示超滤后，万客隆不停地运行

我需要更改什么，使我的魔杖到达UserForm1.Show vbModeless后会停止？

希望有人能帮助我。

整个宏：

Sub Test_Click()
    Call UserForm1.Show(vbModeless)                  ' First Try
    ' UserForm1.Show vbModeless                      ' Second Try
    ' Change UF Settings ShowModal to False

    If UserForm1.ActiveControl.Name = "Cancel" Then
        Unload UserForm1
        Exit Sub
    Else
        ActiveSheet.Shapes.Range(Array("WWP")).Visible = True
        ActiveSheet.Shapes.Range(Array("WP")).Visible = False
    End If
End Sub

VBA-ShowModal = False无法打开UF

0 个答案: