VBA to Ignore All Errors

[peterhinton]

does anyone have any VBA to ignore all errors on a sheet ?

I am aware you can select a whole range of cells to remove a load of errors at once, but it can only remove one type of error at a time I think,

I just want a macro I can run that will ignore any errors in one go,
don't want to turn off any of the options either,

any suggestions welcome, thanks.

 

[JLGWhiz]

Sub t()
On Error Resume Next
'other code here
On Error GoTo 0
End Sub

It ignores the errors but may not give desired results.

 

[peterhinton]

Thanks for effort, but didn't do anything for me,

I have a sheet with a lot of numbers stored as text, and a lot of sums with adjacent numbers,

and a million little blue triangles showing me there is an error! lol

they don't actually affect anything, they just annoy the **** out of me, but I still need all the error checking on as other sheets will use it.

 

[JLGWhiz]

I would like to know how to turn those off myself. I think it is probably in the system settings somewhere, but I have not really pursued it. You could click File>Options to see if you can located the setting for it.

http://spreadsheets.about.com/od/t/g/20113-06-25-excel-definition-red-green-triangle-indicators.htm

 

[peterhinton]

you can access the settings in file>options>formulas> and then rule settings

I want to keep my rule settings, but have a macro that will just ignore errors for me to save me having to highlight a load of cells and manually doing it.

 

[dmt32]

Hi,
not sure if this is what you are looking for but try inserting this line in your code:

Application.ErrorCheckingOptions.BackgroundChecking = False

set back to True when required.

Dave

 

[BarryL]

does anyone have any VBA to ignore all errors on a sheet ?

I am aware you can select a whole range of cells to remove a load of errors at once, but it can only remove one type of error at a time I think,

can you not remove errors by

dim addr as string
Let addr = "A1:Z" & Range("A" & Rows.Count).End(xlup).Row
Range(addr) = Evaluate("IF(ISERROR(" & addr & "),""""," & addr & ")")

 

[peterhinton]

Hi,
not sure if this is what you are looking for but try inserting this line in your code:

Application.ErrorCheckingOptions.BackgroundChecking = False

set back to True when required.

Dave

This is exactly what I was after !

Thanks Dude