Thread: InputBox
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Nayab Nayab is offline
external usenet poster
 
Posts: 62
Default InputBox

On Jun 17, 10:14*am, James8309 wrote:
Hi, All

I have a macro which starts with InputBox. My Macro will only run
correctly without an error if and only if the user has typed the right
number of letters or numbers into the inputbox. PROBLEM IS........
even though I put Note on the inputbox saying "Check your digits, if
it is more than 10digits it will make an error" *they still manage to
screw things up. sigh..

How do I lock the inputbox in such way that unless input is 'n' number
of digits exactly, it wouldn't even run the macro.

Do i use 'if' ?

orksheets("RU").Range("A1") = Application.InputBox("Type Cost Centre
Number, i.e.


In caase u need the input length to be made more than or equal to 10
and you do not want to proceed till the correct length is entered, you
can use sth like:

Sub read_input()
Dim value As String
Do While Len(value) < 10
value = Application.InputBox("Type Cost Centre number:")
Loop
Range("A1").value = value
End Sub