Error on IF statement

[Sabosis]

Hello-

I have the following code that checks 3 scenarios in an IF statement,
and sends an email to a select group if the conditions are true.


If Workbooks("Sr Rep Stats").Worksheets("Combined").Range("d4").Value

0.03 Then

Call CentreVuSeniorA
ElseIf Workbooks("Sr Rep Stats").Worksheets("Combined").Range
("d3").Value > 0.03 Then
Call CentreVuSeniorB
ElseIf Workbooks("Sr Rep Stats").Worksheets("Combined").Range
("d2").Value > 0.03 Then
Call CentreVuSeniorC
Else
End If
Application.DisplayAlerts = False
Application.Quit

"d4" is a combined number for city A & city B, "d3" is city A, and
"d2" is city B. The problem I am having is that this code starts
running at 7:00 am via task scheduler, and there are times that "d3"
might show #DIV/0! as it is a calculated cell and there might not be
statistics for city A at 7:00am.


I tried to add a bit of code to this line to only look at the 2nd IF
statement when the time is greater than 7:00 AM, but it did not work:


If Workbooks("Sr Rep Stats").Worksheets("Combined").Range("d3").Value

0.03 And Time > TimeSerial(7, 0, 0) Then

Call CenrteVuSeniorB

Any ideas?


Thanks

 

[Dave Peterson]

Using .value will return the error. So check first:

if iserror(workbooks(....).worksheets(...).range("d3").value) then
'msgbox, skip it, what???
else
'do your stuff here
...

 

[Sabosis]

Using .value will return the error.  So check first:

if iserror(workbooks(....).worksheets(...).range("d3").value) then
   'msgbox, skip it, what???
else
   'do your stuff here
   ...















--

Dave Peterson- Hide quoted text -

- Show quoted text -

Dave-

How would you tell the code to "skip it" if the value is an error?

 

[Dave Peterson]

That's what the "if iserror(...) then" statement does.

If there's an error, then the "then" portion of the if/then/else statement is
followed. But since there's nothing there, it's skipped.

If there is no error, then the "else" portion is followed. That's where you
would put your code that does the real work.