Setting game speed!

this is beginning to p!?$ me off now. I can't get the damn input box to use the generated number 'inter' (or 'tt'). can anyone help me by telling me where the if inter=vbCancel statment would go, how to get rid of the cancel button or which variable it is that is not correctly accessed.

please check the files included!

ps. the error is '13' = "type miss match" and the line highlighted is = "inter = InputBox(Message, Title, tt, 5000, 5000)"

inter is Long. InputBox returns a string. Use Val(InputBox(...)).

Z.