对于VBA,如果填写了文本框,应该在什么情况下写入提交按钮

时间:2018-03-17 16:47:53

标签: vba excel-vba access-vba excel

我的问题是,如果填写了文本框,则应该在什么情况下写入提交按钮,对于VBA

例如我正在谈论Private sub userform initialize()

我创建了一个用户表单,其中我使用了2帧。当宏运行时,它初始化第一帧,用户登录使用该表单转到另一帧中的下一个表单。

在第二帧格式中我有3个文本框字段。只有当用户输入所有三个文本框时,才应启用命令按钮。我现在坚持在哪个事件中应该编写这段代码。

谢谢

1 个答案:

答案 0 :(得分:0)

假设按钮以“CommandButton1”命名,并且三个文本框是“TextBox1”,“TextBox1”和“TextBox3”之后的名称,则在Userform代码窗格中添加以下内容:

  • UserForm_Initialize地方:

    Me.CommandButton1.Enabled = False
    
  • 为所有这三个文本框添加Change事件处理程序

    Private Sub TextBox1_Change()
        checkEnableButton
    End Sub
    
    Private Sub TextBox2_Change()
        checkEnableButton
    End Sub
    
    Private Sub TextBox3_Change()
        checkEnableButton
    End Sub
    
  • 最后添加以下内容:

    Sub checkEnableButton()
        Me.CommandButton1.Enabled = Me.TextBox1.Value <> "" And Me.TextBox2.Value <> "" And Me.TextBox3.Value <> ""
    End Sub