List box in cell?

[mikerickson]

Hello, welcome to the world of Forms controls. It frustrates me that the ActiveX controls are not avaliable on my Mac.
This is a way to make a list box.

Dim LBox As ListBox
Set LBox = Sheets(1).ListBoxes.Add(100, 100, 100, 100)
LBox.ListFillRange = "$H$1:$H$12"

But LBox is in Sheets(1).Shapes, not .OLEObects
I think you will find this syntax useful

Sheets(1).Shapes(1).ControlFormat.AddItem "ssssss"

The Object Browser is your friend.