Inputbox cancel

Posted by Paul on April 12, 2001 1:36 PM

Is it possible to have a input box that leaves the cell it is inserting data in blank instead of displaying FALSE when cancel is clicked?

Thanks
Paul

Posted by Dave Hawley on April 12, 2001 1:51 PM

Hi Paul

Not too sure I have got you right as the the return value for an Inputbox when cancel is clicked is Empty Text. But try this anyway.

Sub CollectName()
Dim Reply As String
'Written by OzGrid Business Applications
'www.ozgrid.com

Reply = InputBox("What's your name", "Name Survey")
If Reply = "" Then End

Sheets("Sheet1").Range("A1") = Reply
End Sub

Dave

OzGrid Business Applications

Posted by Paul on April 12, 2001 2:15 PM

Thanks