You could implement a Text Box via VBA, i.e:
Sub Prompter()
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' Set prompt.
Title = "InputBox Demo" ' Set title.
Default = "1" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
End Sub
This message was edited by hedrijw on 2002-08-30 09:43