On 4 Apr, 16:14, Werner Rohrmoser wrote:
Hello,

how can I trap an overflow error for a division made in vba code?

Example:
.
other coding
.
If IsError(.Cells(1, 1).Offset(0, -2).Value / .Cells(BaseRangeRow,
1).Offset(0, -2).Value) Then
* *.Cells(1, 1).Value = CVErr(xlErrNA)
Else
* *.Cells(1, 1).Value = .Cells(1, 1).Offset(0,
-2).Value / .Cells(BaseRangeRow, 1).Offset(0, -2).Value
End If
.
other coding
.

When the denomonator is 0, then the procedure stops with an eeror
message "Overflow"

Any idea to manage this situation?

Excel XP SP3
WIN XP SP1

Regards
Werner

Hi Werner

If "denominator" = 0 Then
'Do nothing
Else
Run code
End if

Regards

Steve