ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Value From ComboBox On UserForm (https://www.excelbanter.com/excel-discussion-misc-queries/245438-value-combobox-userform.html)

jlclyde

Value From ComboBox On UserForm
 
I have a user form that I have added 5 columns. When I select one of
the rows it fills in the combobox with the left most data and the rest
is blank. i woudl like the combobox to show all 5 columns.

I am also having trouble reading the value of this box to be used
later on. here is the code that I have and it cycles through each box
and returns boxcount of 0 and box.value returns an error. Thsi was
not happening when I only had one column and was using concatenate to
make columns. This just does nto look as professional.

For Each ctl In Me.Controls 'Check to see if the Comboboxes have
info
If TypeOf ctl Is msforms.ComboBox Then
MsgBox ctl.Name
If ctl.Value < "" Then
BoxCount = BoxCount + 1
Set Box = ctl 'The name of Combobox that is used
End If
End If
Next ctl

Thanks,
Jay

jlclyde

Value From ComboBox On UserForm
 
On Oct 15, 8:46*am, jlclyde wrote:
I have a user form that I have added 5 columns. *When I select one of
the rows it fills in the combobox with the left most data and the rest
is blank. *i woudl like the combobox to show all 5 columns.

I am also having trouble reading the value of this box to be used
later on. *here is the code that I have and it cycles through each box
and returns boxcount of 0 and box.value returns an error. *Thsi was
not happening when I only had one column and was using concatenate to
make columns. *This just does nto look as professional.

* * * For Each ctl In Me.Controls 'Check to see if the Comboboxes have
info
* * * * If TypeOf ctl Is msforms.ComboBox Then
* * * * * * MsgBox ctl.Name
* * * * * * If ctl.Value < "" Then
* * * * * * * * BoxCount = BoxCount + 1
* * * * * * * * Set Box = ctl 'The name of Combobox that is used
* * * * * * End If
* * * * End If
* * Next ctl

Thanks,
Jay


I figured out the Ctl.value it is ctl.text < "" then. I still ahve
no idea on how to show all of the information in my combobox window
after it has been selected. It only shows the first column.
Jay

Dave Peterson

Value From ComboBox On UserForm
 
Comboboxes only show one column's value when you select something.

Maybe it's time to use a listbox???

Or you could extract the values of all the columns and put them in textboxes
(seems a bit of overkill???).

jlclyde wrote:

On Oct 15, 8:46 am, jlclyde wrote:
I have a user form that I have added 5 columns. When I select one of
the rows it fills in the combobox with the left most data and the rest
is blank. i woudl like the combobox to show all 5 columns.

I am also having trouble reading the value of this box to be used
later on. here is the code that I have and it cycles through each box
and returns boxcount of 0 and box.value returns an error. Thsi was
not happening when I only had one column and was using concatenate to
make columns. This just does nto look as professional.

For Each ctl In Me.Controls 'Check to see if the Comboboxes have
info
If TypeOf ctl Is msforms.ComboBox Then
MsgBox ctl.Name
If ctl.Value < "" Then
BoxCount = BoxCount + 1
Set Box = ctl 'The name of Combobox that is used
End If
End If
Next ctl

Thanks,
Jay


I figured out the Ctl.value it is ctl.text < "" then. I still ahve
no idea on how to show all of the information in my combobox window
after it has been selected. It only shows the first column.
Jay


--

Dave Peterson

jlclyde

Value From ComboBox On UserForm
 
On Oct 15, 11:08*am, Dave Peterson wrote:
Comboboxes only show one column's value when you select something.

Maybe it's time to use a listbox???

Or you could extract the values of all the columns and put them in textboxes
(seems a bit of overkill???).





jlclyde wrote:

On Oct 15, 8:46 am, jlclyde wrote:
I have a user form that I have added 5 columns. *When I select one of
the rows it fills in the combobox with the left most data and the rest
is blank. *i woudl like the combobox to show all 5 columns.


I am also having trouble reading the value of this box to be used
later on. *here is the code that I have and it cycles through each box
and returns boxcount of 0 and box.value returns an error. *Thsi was
not happening when I only had one column and was using concatenate to
make columns. *This just does nto look as professional.


* * * For Each ctl In Me.Controls 'Check to see if the Comboboxes have
info
* * * * If TypeOf ctl Is msforms.ComboBox Then
* * * * * * MsgBox ctl.Name
* * * * * * If ctl.Value < "" Then
* * * * * * * * BoxCount = BoxCount + 1
* * * * * * * * Set Box = ctl 'The name of Combobox that is used
* * * * * * End If
* * * * End If
* * Next ctl


Thanks,
Jay


I figured out the Ctl.value it is ctl.text < "" then. *I still ahve
no idea on how to show all of the information in my combobox window
after it has been selected. *It only shows the first column.
Jay


--

Dave Peterson- Hide quoted text -

- Show quoted text -


The left is the most important. I think I will stick with the
Combobox. Thanks for the help.
Jay


All times are GMT +1. The time now is 09:59 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com