Hi all

I am making a user form which have 3 text boxes, OK and CANCEL buttons. I want to disable the OK button until all the textboxes filled. Once all textbox fields are filled with input data, the OK button becomes enabled.

I woner how can I do this. I tried various ideas but could not do it. Could you help please.

Thanks;

Hi,

First thing to do is set OK commandbutton property Enabled=False

Write your code something like this:

Private Sub TextBox1_Change()
If TextBox1 = True And TextBox2 = True And TextBox3 = True Then
    CommandButton1.Enabled = True
Else
    CommandButton1.Enabled = False
End If
End Sub

Private Sub TextBox2_Change()
Call TextBox1_Change
End Sub

Private Sub TextBox3_Change()
Call TextBox1_Change
End Sub

-vemaju

vemaju

I tried this way previously but didn't work. I applied it with your suggestion again but didn't work either. I don't know where lies the error!!

Anyone can help please.

Thanks to all.

Hi,
Can you post the code?

-vemaju

I added another two textboxes but I think it would be the same , as follows:

Private Sub txtMW_Change()
    Call txtName_Change
End Sub

Private Sub txtName_Change()
    If txtName = True And txtMW = True And txtSG = True And txtTc = True And txtParachor = True Then
        cmdOK.Enabled = True
    Else
        cmdOK.Enabled = False
    End If
End Sub

Private Sub txtParachor_Change()
    Call txtName_Change
End Sub

Private Sub txtSG_Change()
    Call txtName_Change
End Sub

Private Sub txtTc_Change()
    Call txtName_Change
End Sub

Hi,

This code works well in my Userform.
Try to insert breakpoin in your code and inspect where the error lies

-vemaju

I tried the following, it worked fine:

If Not txtName = "" And Not txtMW = "" And Not txtSG = "" And Not txtTc = "" And Not txtParachor = "" Then
    cmdOK.Enabled = True
Else
    cmdOK.Enabled = False
End If

It seems the "TextBox1 = True" does not work, at least with me.

Anyway, vemaju thanks for the help.