You could try this. It works for me in a column so I don't
see why it shouldn't work with a row.

dim Mylastcell
Mylastcell = worksheets("name").Range("A1") _
..End(xlToRight).Address(ROWABSOLUTE:=False)

with worksheets("name").combobox1
.list = worksheets("name").Range("A1:" & _
Mylastcell).value
end with

hth


-----Original Message-----
Hi
I have been asked to create a combo box containing the
following information. From a row I need to select the
information from, for example A1:X1, and place this in a
combo box.
However if a new column is created/inserted the combo box
should allow for this and the new value should appear in
the combo box list.

Hope that makes sense
Any help on how to do this is much appreciated
New user
.