Div/0 in VBA

Bild

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 ??

Bild


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


Bild


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

danke


Bild


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


 Bild

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