Gord,

I tried your parameters, but the position of the Application.InputBox did
not budge. I neglected to mention that I dragged the Box to a new location
using my mouse cursor prior to testing the code in my example. I am at a
loss...

Tom
--
TomThumb


"Gord Dibben" wrote:

Works for me when I change the numbers for Left and Top.

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


Gord Dibben MS Excel MVP


On Tue, 31 Jul 2007 09:18:00 -0700, TomThumb
wrote:

John,

Thank you for your suggestion, but I would prefer a direct answer to my
question as to why the Application.InputBox example I gave does not work.
I'm reluctant to use your suggestion due to added complexity and possible
unintended consequences.

Tom