Code to check errors in excel 2002
Thanks Dave!!!
"Dave Peterson" a écrit dans le message de
...
This checks to see what the formulas evaluate to:
Option Explicit
Sub testme()
Dim TestRng As Range
Dim wks As Worksheet
Set wks = ActiveSheet
With wks
Set TestRng = Nothing
On Error Resume Next
Set TestRng = .Cells.SpecialCells(xlCellTypeFormulas, xlErrors)
On Error GoTo 0
If TestRng Is Nothing Then
MsgBox "No errors in formulas!"
Else
MsgBox "You've got errors he " &
TestRng.Address(external:=True)
End If
End With
End Sub
Redan wrote:
Hello,
Does anyone have a vba code that checks if all the formulas inside a
worksheet does not contain any errors such as #REF, etc ... ?
Thank you in advance !
--
Dave Peterson
|