wolf.stalker
11-07-2009, 03:23 AM
Can someone give me an idea why this error's out?
For iLCV = 1 To 10
ActiveWorkbook.Worksheets("Form").cmbSite.AddItem = Range("B" & iLCV).Text
Next iLCV
I am getting runtime error 438 here.
On a worksheet named Form, i have a combo box named cmbSite. I am trying to loop through (in this case) 10 rows of data to populate that combo box.
the cell where the box is shows =EMBED("Forms.ComboBox.1","")
thanks for the help
For iLCV = 1 To 10
ActiveWorkbook.Worksheets("Form").cmbSite.AddItem = Range("B" & iLCV).Text
Next iLCV
I am getting runtime error 438 here.
On a worksheet named Form, i have a combo box named cmbSite. I am trying to loop through (in this case) 10 rows of data to populate that combo box.
the cell where the box is shows =EMBED("Forms.ComboBox.1","")
thanks for the help