View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.misc
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default Meaning of On Error Goto 0

The "on error resume next" says that your could expects that an error could come
from the next few(?) lines--until you turn error checking back on.

I'd use:

Option Explicit
Sub test()
Dim x As Range

set x = nothing
On Error Resume Next
Set x = Application.InputBox("Select the cells.", Type:=8)
on error goto 0

if x is nothing then
msgbox "You Cancelled The Operation."
else
MsgBox x.Address
end if

End Sub

FARAZ QURESHI wrote:

Would one of you please explain the following code to me step by step?

Sub test()
Dim x As Range
On Error Resume Next
Set x = Application.InputBox("Select the cells.", Type:=8)
If Err.Number < 0 Then
MsgBox ("You Cancelled The Operation.")
Exit Sub
On Error GoTo 0
End If
MsgBox (x.Address)
End Sub

All I want to do is create an inputbox which ONLY upon hitting the Cancel
Button would display the msgbox "You Cancelled The Operation." and not on any
other error.

All your help and expert advice shall be obliged.

Thanx in advance.


--

Dave Peterson