Herbers Excel/VBA-Archiv

Div/0 in VBA

• Div/0 in VBA von thorsten vom 03.10.2003 12:03:57
  • AW: Div/0 in VBA - von ChrisL am 03.10.2003 12:09:53
    • ok - von thorsten am 03.10.2003 12:14:58
  • AW: Div/0 in VBA - von Hans W. Hofmann am 03.10.2003 13:08:03

Betrifft: Div/0 in VBA von: thorsten
Geschrieben am: 03.10.2003 12:03:57

gibt es im Excel eine VBA formel, die automatisch in der gesamten
arbeitsmappe nach "div/0" fehlern sucht und diese durch "--" ersezt ??




Betrifft: AW: Div/0 in VBA von: ChrisL
Geschrieben am: 03.10.2003 12:09:53

Hi Thorsten

Option Explicit



Sub Div0()
Dim iBlatt As Integer
Dim Zelle As Range

For iBlatt = 1 To Worksheets.Count
    For Each Zelle In Worksheets(iBlatt).UsedRange
        If IsError(Zelle) Then Zelle = "--"
    Next Zelle
Next iBlatt
End Sub




Es werden allerdings auch alle anderen Fehler ersetzt, z.B. #N/A etc.

Gruss
Chris




Betrifft: ok von: thorsten
Geschrieben am: 03.10.2003 12:14:58

danke




Betrifft: AW: Div/0 in VBA von: Hans W. Hofmann
Geschrieben am: 03.10.2003 13:08:03

Bei Divisionen fragt man mittelts WENN-Abfage den Nenner<>0 ab und führt dann die Division aus Sonst "--". Da braucht kein VBA...
=WENN(A<>0;B/A;"--")


Gruß HW