dim myCell as range
dim myRng as range

set myrng = worksheets("sheet2").range("e2:h2")

With me.combobox3
for each mycell in myrng.cells
.additem mycell.value
next mycell
end with


ca1358 wrote:

How do you write a source in code in VB Code for a ComboBox3 on an Excel
UserForm where the source is horizontal range. For example Sheet2!E2:H2.
--
ca1358

--

Dave Peterson