Hello Rich

Dim WhatNumber As Long
While WhatNumber < 1 Or WhatNumber 100
WhatNumber = Application.InputBox("Input number between 1 and 100",
"Number?", , , , , , 1)
Wend

HTH
Cordially
Pascal

"Rich" (no spam) a écrit dans le message de news:
...
have a macro which requires a user to enter a number between 2 values (1
and
100) , is their a way to shorten the imput box field so only allow values
between these figures