Oh...the word DUH! comes to mind now.... I feel stupid. My data on the sheet, is in merged cells...the ranges don't match. A7:Y24 : 24-7 does not equal 9 columns.

Thurman
"Tom Ogilvy" wrote in message ...
Headers work as well.

--
Regards,
Tom Ogilvy

"Tom Ogilvy" wrote in message ...
Private Sub UserForm_Initialize()
lstStore.ColumnHeads = True
lstStore.ColumnCount = 9
lstStore.ColumnWidths = "100;20;20;20;20;20;20;20;20"
lstStore.RowSource = "A7:Y24"


End Sub

worked fine for me in Excel 2000, SR1, US English, Win 2000

I filled the cells with their address

A7 B7 C7 etc
A8 B8 C8 etc

--
Regards,
Tom Ogilvy

"Thurman" wrote in message news:RaDbb.551257$uu5.91349@sccrnsc04...
Ok, would someone be so kind as to help me here. I am losing my head.

I have a listbox with 9 columns, I want to use the column header feature, so I set the following code:


lstStore.ColumnCount = 9
lstStore.ColumnWidths = "100;20;20;20;20;20;20;20;20"
lstStore.RowSource = "A7:Y24"

My results are as follows where as Colx is for viewing purposes with this post and null is the absence of information:

Col1 Col2 Col3 Col4 Col5 Col6 Col7 Col8 Col9
A7 null null null null null null B7 null
A8 null null null null null null B8 null
A9 null null null null null null B9 null
A10 null null null null null null B10 null
A11 null null null null null null B11 null
...and so on and so on (kinda hoping this will line up for the viewers)

It doesn't put the Bx in Col2 then put Cx in Col3 then Dx in Col4 and so on...

What am I not doing? I get the headers for the columns to show up, I just am not getting the values for the complete range to populate in the list.


Thurman