Hi;
what is the proper syntax for RowSource:
ListBox1.RowSource=Range("A1:L1")
gives me just A1 cell as the only element
in the ListBox.List. Thanks. Boba

you can try this

Private Sub UserForm_Activate()
Dim ws As Worksheet
Dim i As Long
Set ws = Worksheets("Sheet1")
For i = 1 To 12
Me.ListBox1.AddItem ws.Cells(1, i)
Next
End Sub

--


Gary


"Boba" wrote in message
...
Hi;
what is the proper syntax for RowSource:
ListBox1.RowSource=Range("A1:L1")
gives me just A1 cell as the only element
in the ListBox.List. Thanks. Boba

You only have one row in A1:L1.

If you want each of the values in A1:L1 as your list:

listbox1.list = application.transpose(range("a1:L1").value)



Boba wrote:

Hi;
what is the proper syntax for RowSource:
ListBox1.RowSource=Range("A1:L1")
gives me just A1 cell as the only element
in the ListBox.List. Thanks. Boba

--

Dave Peterson

Try something more like this...

ListBox1.RowSource=Sheets("Sheet1").Range("A1:L1") .Address
--
HTH...

Jim Thomlinson


"Boba" wrote:

Hi;
what is the proper syntax for RowSource:
ListBox1.RowSource=Range("A1:L1")
gives me just A1 cell as the only element
in the ListBox.List. Thanks. Boba

My code does not work (in retrospect). Use Dave's
--
HTH...

Jim Thomlinson


"Jim Thomlinson" wrote:

Try something more like this...

ListBox1.RowSource=Sheets("Sheet1").Range("A1:L1") .Address
--
HTH...

Jim Thomlinson


"Boba" wrote:

Hi;
what is the proper syntax for RowSource:
ListBox1.RowSource=Range("A1:L1")
gives me just A1 cell as the only element
in the ListBox.List. Thanks. Boba