create activeX component runtime? (i.e checkbox or textbox)

Turbothorup · Jul 13th 2004

I would like to change the look of my userform runtime. I have a userform and depending on which value you choose from some comboboxes the layout should change. I do that by applying the changes in the
"Sub combobox_Change()", but I still cant find out how to add a checkbox or a textbox........can change the height and the position of existing elements, but not creating new ones?

I am quite new to VBA, so it probably has to be quite well explained :thanx:

I had a similar post ealier but I do not think it was clear that I meant runtime....

Below is a a little paste of this part of my code where I want the changes to appear:

Code

Private Sub cmbStrategy_Change()


If frmNewswap.cmbStrategy.Value = "Pair" Then
frmNewswap.Height = 500


Else
frmNewswap.Height = 400


End If


End Sub

Display More

Thanks in advance.....

Jong · Jul 13th 2004

I'm not sure about creating a new control on the fly like that.. but have you considered "hiding/unhiding" the controls?

If you need to create a checkbox, you would just have to set the "Visible" property accordingly.

This is a suggestion, hope it helps

**Andy Pope** · Jul 13th 2004

Hi,

Add a command button to a userform and put the following code in the click event.

Code

Private Sub CommandButton1_Click()
    Dim objTemp As Control
    Set objTemp = Me.Controls.Add("Forms.Textbox.1", "txtNew", True)
    With objTemp
        .Left = 5
        .Top = 10
        .Width = 80
        .Height = 20
        .Text = "Hello World"
    End With
End Sub

Display More

This will add a textbox to the userform.

Turbothorup · Jul 13th 2004

Very good.........this is exactly what I meant......thank you for your effort...

create activeX component runtime? (i.e checkbox or textbox)

Participate now!

Share