Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Differentiate between False and Zero for Input Box return?
Hi Everyone,
I've got an input box that asks a question and I have the default set for zero. I'd like to write some follow up logic that reverts back to the beginning if the cancel button is chosen, but I'd like to keep the zero value as true. Is there anyway to do this? I've included the code below. As always I really appreciate the help. Dim Sulfur As String Sulfur = Application.InputBox("If you do not have any of this isotope in your lab, please enter 0 and press OK", "35S", 0) Range("G33") = Sulfur If Sulfur = False Then MsgBox "You clicked Cancel. Please try again.", 64, "Cancel was clicked." GoTo Sulfur ElseIf Sulfur = 0 Then GoTo P32 Else GoTo P32 End If Thanks, Chad |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Differentiate between False and Zero for Input Box return?
Sub test()
Dim vResult As Variant vResult = Application.InputBox("input or cancel") If VarType(vResult) = vbBoolean Then MsgBox "user cancelled" Else: MsgBox vResult End If End Sub Regards, Peter T "Chadersmith" wrote in message ... Hi Everyone, I've got an input box that asks a question and I have the default set for zero. I'd like to write some follow up logic that reverts back to the beginning if the cancel button is chosen, but I'd like to keep the zero value as true. Is there anyway to do this? I've included the code below. As always I really appreciate the help. Dim Sulfur As String Sulfur = Application.InputBox("If you do not have any of this isotope in your lab, please enter 0 and press OK", "35S", 0) Range("G33") = Sulfur If Sulfur = False Then MsgBox "You clicked Cancel. Please try again.", 64, "Cancel was clicked." GoTo Sulfur ElseIf Sulfur = 0 Then GoTo P32 Else GoTo P32 End If Thanks, Chad |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Differentiate between False and Zero for Input Box return?
Thanks Peter!
"Peter T" wrote: Sub test() Dim vResult As Variant vResult = Application.InputBox("input or cancel") If VarType(vResult) = vbBoolean Then MsgBox "user cancelled" Else: MsgBox vResult End If End Sub Regards, Peter T "Chadersmith" wrote in message ... Hi Everyone, I've got an input box that asks a question and I have the default set for zero. I'd like to write some follow up logic that reverts back to the beginning if the cancel button is chosen, but I'd like to keep the zero value as true. Is there anyway to do this? I've included the code below. As always I really appreciate the help. Dim Sulfur As String Sulfur = Application.InputBox("If you do not have any of this isotope in your lab, please enter 0 and press OK", "35S", 0) Range("G33") = Sulfur If Sulfur = False Then MsgBox "You clicked Cancel. Please try again.", 64, "Cancel was clicked." GoTo Sulfur ElseIf Sulfur = 0 Then GoTo P32 Else GoTo P32 End If Thanks, Chad . |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Differentiate between False and Zero for Input Box return?
Try Dim S As String S = InputBox("prompt", "title", 0) If StrPtr(S) = 0 Then Debug.Print "cancel" Else Debug.Print S End If Cordially, Chip Pearson Microsoft MVP 1998 - 2010 Pearson Software Consulting, LLC www.cpearson.com [email on web site] On Mon, 25 Jan 2010 09:21:02 -0800, Chadersmith wrote: Hi Everyone, I've got an input box that asks a question and I have the default set for zero. I'd like to write some follow up logic that reverts back to the beginning if the cancel button is chosen, but I'd like to keep the zero value as true. Is there anyway to do this? I've included the code below. As always I really appreciate the help. Dim Sulfur As String Sulfur = Application.InputBox("If you do not have any of this isotope in your lab, please enter 0 and press OK", "35S", 0) Range("G33") = Sulfur If Sulfur = False Then MsgBox "You clicked Cancel. Please try again.", 64, "Cancel was clicked." GoTo Sulfur ElseIf Sulfur = 0 Then GoTo P32 Else GoTo P32 End If Thanks, Chad |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Conditional Formatting to differentiate between Input and Calcs | Setting up and Configuration of Excel | |||
Input box doesn't close if input is false | Excel Programming | |||
LOOKUP and return the column heading for IF/THEN return for False | Excel Discussion (Misc queries) | |||
if false return a zero | Excel Discussion (Misc queries) | |||
Differentiate b/w False and 0 with InputBox fn | Excel Programming |