return empty cell

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von petaod.

    return empty cell

    Visual Basic-Quellcode

    1. Function BRXFollowMean(ByVal r As Range, ByVal i As Integer) As Double
    2. If i <= WorksheetFunction.CountA(r) Then
    3. Dim PartialRange As Range
    4. Set PartialRange = Range(r.Cells(1, 1).Offset(0, i - 1), r.Cells(1, r.Cells.Count))
    5. BRXFollowMean = WorksheetFunction.Average(PartialRange)
    6. Else
    7. BRXFollowMean = CVErr(xlErrValue)
    8. End If
    10. End Function


    Gibt es eine Möglichkeit, statt dem Fehlerwert die Zelle einfach leer zu lassen. In etwa "BRXFollowMean = emptycell" ?

    Gibt es eine Möglichkeit, statt dem Fehlerwert die Zelle einfach leer zu lassen. In etwa "BRXFollowMean = emptycell"
    Welche Zelle?
    BXFollowMean ist ein Double.
    Du kannst auch den Else-Zweig ganz leer lassen, dann wird 0,0 zurückgegeben.
    emptycell (was in etwa "" entspräche) kannst du nicht einem Double zuweisen.

    Auch die Zeile BRXFollowMean = CVErr(xlErrValue) wird einen Runtime-Error werfen, weil das kein Double zurück gibt.
    Wenn dir ein Nullwert nicht sicher genug erscheint, dann übergibt im Fehlerfall -99999.99999 oder so was ähnliches
    --
    If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
    --

Facebook
Telefonspende