What you must do is validate the input BEFORE putting it into the vulnerable
cell. This code rrequires 10 digits exactly:

Sub Test()
Dim S As String
Dim OK As Boolean
Do
OK = True
S = InputBox("10 digits please:", , S)
If StrPtr(S) = 0 Then Exit Sub 'cancelled
If Not S Like "##########" Then OK = False '10 digits
Loop Until OK = True
Worksheets("RU").Range("A1") = S
End Sub

HTH. Best wishes Harald

"James8309" wrote in message
...
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.