I'm running 365 Home, latest version, on Windows 10.
I recently discovered application.inputbox which gives the ability to define the Type of input, string, number etc. I wanted to ensure idiot proof input of data. In general this method works as described on the box but there are issues. I've used macro1() to descibe the problems:




Sub Macro1()
'
' Macro1 Macro

Dim lnWins As Variant

lnWins = Application.InputBox("give me something", Type:=1)
MsgBox lnWins

'1 Entering a number works as intended. Good
'2 Entering a non-numeric gives an error msg then returns for input. Good
'3 Cancel gives "False". Good
'4 Click x (top right) gives "False". Good
'5 Clicking OK with no entry in inputbox gives the message in attahed pic. Not good
'6 Clicking "?" opens a ms web page about ranges. Not good
End Sub 'Macro1


inputbox1.png

I have tried numerous ms websites but with no result.
Can anyone suggest workarounds to cope with items 5 & 6 above