iData = InputBox(Prompt:="Введите данные", Title:="http://samplecode.ru")
С помощью именованного аргумента Default можно задать текст по умолчанию, а с помощью аргументов XPos, YPos можно управлять размещением диалогового окна на экране, ниже пример:
iData = InputBox(Prompt:="Введите данные", Title:="", Default:="Просто текст", XPos:=250, YPos:=250)