OleObjects and someproperties

[Kris]

Hi.

I inserted object; combo box

Dim combo As OLEObject

Set combo = ActiveSheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1",
Link:=False, DisplayAsIcon:=False, Left:=100, Top:=100.Top, Width:=96,
Height:=18)

I can set some of the properties

combo.LinkedCell = "$g$6"

but I also have to set ColumnCount and ColumnWidth properties of
combobox. I can do that manually, but they are not listed as a
properties in VBA

Ho to do that from VBA?

Thanks.

 

[Norman Jones]

Hi Kris,

Try:

Dim combo As msforms.ComboBox

 

[Chip Pearson]

Use

combo.Object.ColumnCount = 2


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

 

[Kris]

Use

combo.Object.ColumnCount = 2

This is it.

So simple solutions are so difficult to find.

 

[Kris]

Thanks, but it works only if you have object on userform, not on worksheet.
Thanks anyway.