Hi All -

Using an application.inputbox for numbers, and I understand Cancel =
FALSE, and FALSE = zero.

I need zero to be an acceptable number. How do I separate the FALSE from
the zero?

Thanks in advance.
....Capt. Nemo

One way:

Option Explicit
Sub testme()
Dim resp As Variant
resp = Application.InputBox(Prompt:="Number", Type:=1)

If CStr(resp) = "False" Then
MsgBox "Cancel"
Else
MsgBox resp
End If
End Sub



Nemo wrote:
>
> Hi All -
>
> Using an application.inputbox for numbers, and I understand Cancel =
> FALSE, and FALSE = zero.
>
> I need zero to be an acceptable number. How do I separate the FALSE from
> the zero?
>
> Thanks in advance.
> ...Capt. Nemo

--

Dave Peterson

In article <(E-Mail Removed)>,
Dave Peterson <(E-Mail Removed)> wrote:

> One way:
>
> Option Explicit
> Sub testme()
> Dim resp As Variant
> resp = Application.InputBox(Prompt:="Number", Type:=1)
>
> If CStr(resp) = "False" Then
> MsgBox "Cancel"
> Else
> MsgBox resp
> End If
> End Sub
>
>

Hi Dave -

Got it. Thanks.

....best, Capt. N.