UserForm ListBox

[jthomas24]

Hello

I have created a user form and it has a list box with about 7 columns and then there is 7 Labels. What i am trying to do now is when a row is selected in the list box, i want to Labels to show what is selected, and then constantly change when another option is selected from the list box. The labels start from 9 to 16.

Thank you

 

[My Aswer Is This]

If I understand you correctly you have a Userform listbox named ??? I need the name
And you want the value from the row selected to be entered into your 7 labels named ???
So the value in column (1) goes to label1 the data in column (2) goes to label2 etc. etc.

It's important to keep your labels named label1 label2 label3 etc.

I will get back with you. But since you did not give me the name of the listbox I will go with listbox1

 

[jthomas24]

List box name is ListBox1 and labels are Label9, Label10, Label11 etc

 

[My Aswer Is This]

Try this:

Assuming your Listbox is named "ListBox1"
And your listbox is a muticolumn ListBox with 7 columns.

Try this:

Private Sub CommandButton2_Click()
Dim i As Long
 
If ListBox1.ListIndex < 0 Then
MsgBox "You must select some row in the List Box"
Exit Sub
End If
   
    For i = 9 To 15
        Controls("Label" & i).Caption = ListBox1.List(, i - 9)
    Next
End Sub

 

[jthomas24]

it worked! Thank you

 

[My Aswer Is This]

Glad I was able to help you. Come back here to Mr. Excel next time you need additional assistance.

it worked! Thank you