Microsoft Excel

Herbers Excel/VBA-Archiv

Div/0 in VBA

    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