Thread: Select Case Query??
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Papou Papou is offline
external usenet poster
  
Posts: 67
Default Select Case Query??
Hello

On Error GoTo ItsOk
r = Application.InputBox("Enter string", "Input", , , , , , 2) / 2
If Err = 0 Then MsgBox "string not ok"
Exit Sub

ItsOk:
MsgBox "string Ok"

HTH
Cordially
Pascal


Reply With QuoteReply With Quote