determine row where activex control is placed

[jigs d]

hi all,

i m creating dynamic list boxes in excel sheet. now on the selection of the
item of the list box i want to pouplate cells in the same row.
how can i do it?

jigs D

 

[NickHK]

Here's one way:

Dim LBox As OLEObject

Set LBox = ActiveSheet.OLEObjects.Add(ClassType:="Forms.ListBox.1",
Link:=False, _
DisplayAsIcon:=False, Left:=278.25, Top:=283.5, Width:=117, Height:=
33)

MsgBox LBox.TopLeftCell.Address

NickHK