Tom, Jason,

Thanks both for your help. I was still having problems even after I started
using Jason's code. I was just stripping the spreadsheet to upload it and
it worked. Turns out it must be because of the other sheets I already had
in the workbook.

Thanks again

Happy New Year to one and all.

Dean
"Dkso" wrote in message
...
Hi, and Happy New Year to one and All.

I am having and have had a problem with putting a Combobox on a form in
Excel. I have the following code but when executed nothing is listed in
the combobox for selection.

myDesc = WorksheetFunction.VLookup(ComboBox1.Value, _
Worksheets("Sheet1").Range("A1:B16"), 2, False)
Label4.Caption = myDesc

This procedure has been put into, the Change, the Enter the Enter and at
one time I put it into the BeforeUpdate event.

I have "Sheet1" set-up with a list of 16 "item codes" in column "A" and 16
"Descriptions" in Column "B".
Label4 is to show the corresponding item Description, when the item code
is selected.


Help please!

Thanks
Dean