Bob

That sounds right and is right!

Should have spotted that myself. Didn't even look at properties. Just swore
a lot. Strange that the latter didn't fix it <bg>.

--
Steve


"Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
news:eWanZtvRGHA.5656@TK2MSFTNGP11.phx.gbl...
> That sounds as though you have set the RowSource property in the Combobox,
> which means you cannoty add to the combo.
>
> --
>
> HTH
>
> Bob Phillips
>
> (remove nothere from the email address if mailing direct)
>
> "Steve" <No Spam> wrote in message news:441606b0$1@dnews.tpgi.com.au...
>> I'm stumped!!
>>
>> I am trying to populate a Combobox from a range of data. Using the code
>> below, I can fill a listbox. However, If I add ComboBox1 to the form and
>> change the code below from "Me.ListBox1.AddItem cell.Value" to
>> "Me.ComboBox1.AddItem cell.Value", I get an error: Runtime error 70
>> Permission denied. Can someone help?
>>
>> Private Sub UserForm_Initialize()
>> Dim cell As Range
>> Dim rng As Range
>>
>> With ThisWorkbook.Sheets("shOrder")
>> Set rng = .Range("a4", .Range("a4").End(xlDown))
>> End With
>>
>> For Each cell In rng.Cells
>> Me.ListBox1.AddItem cell.Value
>> Next cell
>> End sub
>>
>> --
>> Steve
>>
>>
>
>