Try this one out
ActiveSheet.OLEObjects.Add(ClassType:="Forms.TextB ox.1", Link:=False, _
DisplayAsIcon:=False, Left:=10, Top:=10, Width:=88.5, Height:= _
13.5).Select
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"TomThumb" wrote:

I don't care about X in the following code, I just want to control where the
textbox appears onscreen. Changing the values of Left and Top has no effect.
Why? What am I missing?

Sub test()
Dim X
X = Application.InputBox(prompt:="Hello", Left:=10, Top:=10, Type:=5)
End Sub

--
TomThumb