how to stop "On error resume next" ?

On Error GoTo 0

that is goto zero.

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions

In article <[email protected]>,
[email protected] says...
> Hello,
> Does anyone know how to make that:
> Application.displayerror = false (like: On error resume next)
> If Dir("D:\temp\") = "" Then
> Exit Sub
> End If
> If (error.count = 1) then
> exit sub
> endif
> Application.displayerror = true
>
> I can make a: On error resume next at the beginning but how can I say, On
> error resume next = False ?
> Thanks,
>

Thanks a lot!
does a way to improved my prog ?
On Error Resume Next
If Dir("V:\Ace\") = "" Then
Exit Sub
End If
On Error GoTo 0

"Tushar Mehta" a écrit :

> On Error GoTo 0
>
> that is goto zero.
>
> --
> Regards,
>
> Tushar Mehta
> www.tushar-mehta.com
> Excel, PowerPoint, and VBA add-ins, tutorials
> Custom MS Office productivity solutions
>
> In article <[email protected]>,
> [email protected] says...
> > Hello,
> > Does anyone know how to make that:
> > Application.displayerror = false (like: On error resume next)
> > If Dir("D:\temp\") = "" Then
> > Exit Sub
> > End If
> > If (error.count = 1) then
> > exit sub
> > endif
> > Application.displayerror = true
> >
> > I can make a: On error resume next at the beginning but how can I say, On
> > error resume next = False ?
> > Thanks,
> >
>