Cmbobox and textBox

[eliking510]

Hey...!

I have a UserForm with 1 combobox and 2 textBoxes.
When i will choose a specifiq value from the combobox, i want a third textbox to be added .

Example : I have these values in the combo => "home", "Office" & "Other"
when i will choose "Other" , I want a textbox to be added
in (a third one)

Can anyone help me ??
Thank You !

 

[GTO]

Hi there,

Rather than add the textbox, might I suggest you just change its visibility?

Mark

 

[eliking510]

Hi there,

Rather than add the textbox, might I suggest you just change its visibility?

Mark

-------------------------------
I thought about it, but i don't know how to do that
I want that the textbox will be visible only if choose a specific value from the combobox

thank you

 

[GTO]

A simple example, but see if this gets you started.

In a blank/new wb, add a userform with one combobox and three textboxes, default names to all. You can see that we use the form's initialize event to initially hide the one textbox, as well as populate the combobox and layout the controls.

You can try using the combobox's change event to hide/display the textbox.

Option Explicit
    
Private Sub ComboBox1_Change()
    TextBox3.Visible = ComboBox1.Value = "Two"
End Sub
    
Private Sub UserForm_Initialize()
    
    With Me
        With ComboBox1
            .AddItem "One"
            .AddItem "Two"
            .AddItem "Three"
            .Height = 16
            .Left = 12
            .Style = fmStyleDropDownList
            .Top = 12
        End With
        With TextBox1
            .Height = 16
            .Left = 12
            .Top = 34
        End With
        With TextBox2
            .Height = 16
            .Left = 12
            .Top = 56
        End With
        With TextBox3
            .Height = 16
            .Left = 12
            .Top = 78
            .Visible = False
        End With
    End With
End Sub

Hope that helps,

Mark

 

[eliking510]

A simple example, but see if this gets you started.

In a blank/new wb, add a userform with one combobox and three textboxes, default names to all. You can see that we use the form's initialize event to initially hide the one textbox, as well as populate the combobox and layout the controls.

You can try using the combobox's change event to hide/display the textbox.

Option Explicit
 
Private Sub ComboBox1_Change()
    TextBox3.Visible = ComboBox1.Value = "Two"
End Sub
 
Private Sub UserForm_Initialize()
 
    With Me
        With ComboBox1
            .AddItem "One"
            .AddItem "Two"
            .AddItem "Three"
            .Height = 16
            .Left = 12
            .Style = fmStyleDropDownList
            .Top = 12
        End With
        With TextBox1
            .Height = 16
            .Left = 12
            .Top = 34
        End With
        With TextBox2
            .Height = 16
            .Left = 12
            .Top = 56
        End With
        With TextBox3
            .Height = 16
            .Left = 12
            .Top = 78
            .Visible = False
        End With
    End With
End Sub

Hope that helps,

Mark

-----------------------------------
Thanks A lot !! it works !!

 

[GTO]

Glad to help