In Excel this works. It is not exactly the same.
Dim Message, Title, Default, MyValue
Message = "Enter a Range R*C*:R*C* " ' Set prompt.
Title = "InputBox Demo" ' Set title.
Default = "" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
Application.Goto Reference:=MyValue '"R1C1:R5C4"