View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Redan Redan is offline
external usenet poster
 
Posts: 8
Default 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