View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_7_] Bob Phillips[_7_] is offline
external usenet poster
 
Posts: 1,120
Default New object on spreadsheet

I don't understand what you mean, this works for me

'-----------------------------------------------------------------
Sub CreateCombobox()
'-----------------------------------------------------------------
Dim oWs As Worksheet
Dim oOLE As OLEObject

Set oWs = ActiveSheet

Set oOLE = ActiveSheet.OLEObjects.Add(ClassType:="Forms.Combo box.1", _
Left:=200, Top:=100, Width:=80, Height:=32)

oOLE.Name = "myBox"
MsgBox oOLE.Name
oOLE.ListFillRange = "A1:A10"

End Sub


--
HTH

Bob Phillips

"Gary Labowitz" wrote in message
...
I am creating a combobox using vba. (with OLEObjects.Add)
Since there will be several, I want to name them myself and have code

ready
to support them. I can set the name property as I wish, but it doesn't

take
effect until after the procedure in whice I created the object is

completed.
I would also like to add the listitems and position the boxes relative to
one another. I can do this in vba as well, but not in the same procedure

in
which they are created. This has meant having two command buttons: one to
create, and one to setup.
Is there a method I can call in the create code that will update the
controls collection so that I can setup in the same procedure? Something
like Refresh, as used on other controls like ADO controls, etc.
I can't find one. Help!
Thanks,
--
Gary