Couple of userform textbox/commanbutton questions

[PATSYS]

Hi all,

I have textbox1 and commandbutton3 in userform.

Commandbutton3 has the below code:

Private Sub CommandButton3_Click()
x = Application.GetOpenFilename(FileFilter:="Excel Files (*.xls), *.xls", Title:="Choose File", MultiSelect:=False)
MsgBox "You selected " & x
End Sub
[code]


1. I would like that commandbutton3 to be only visible if the user selects textbox1

2. When user clicks on commandbutton3 and selects the file, I would like x to populate textbox1.


Is that possible?

Thanks

 

[PATSYS]

Hi Mike,

Please disregard my last post. I got it now.

Thanks again!

 

[Jon von der Heyden]

In the Object Browser there is a class fmDropButtonStyle that lists
fmDropButtonStyleArrow
fmDropButtonStyleEllipsis
fmDropButtonStylePlain
fmDropButtonStyleReduce

I got that bit thanks, but I can't find 'ShowDropButtonWhen'...

 

[mikerickson]

From memory, but I think the constants for the ShowDropButtonWhen property are
fmShowDropButtonWhenFocus
fmShowDropButtonWhenAlways
fmShowDropButtonWhenNever

The Object Browser does not show that as a property for a Text Box in my version either.

 

[mikerickson]

After some testing, the RefEdit control also has to these properties, even though they aren't listed in the Object Browser.

 

[Jon von der Heyden]

From memory, but I think the constants for the ShowDropButtonWhen property are
fmShowDropButtonWhenFocus
fmShowDropButtonWhenAlways
fmShowDropButtonWhenNever

The Object Browser does not show that as a property for a Text Box in my version either.

It's not in my Object Browser anywhere. Any idea why that may be?

 

[mikerickson]

In Excel 2004, the DropButtonStyle and ShowDropButtonWhen properties and associated constants are part of the MicroSoft Forms 2.0 Object Library.

When using 2007 at work, I seem to recall (un-tested) that the properties for a UF control aren't shown in the Object Browser unless the project has a UF with that kind of control.

You might try putting a ComboBox in a userform and entering DropButton as the Object Browser's search term.

 

[Jon von der Heyden]

Brilliant, thank you Mike.