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

Beiträge aus den Excel-Beispielen zum Thema " WG: Auswahlbox txt Datei importieren"