Negatiiviset luvut -> nolla

Vexceli

Moi,

Miten saan kerrottua koneelle, että ei laske summa funktioon negatiivisia lukuja. Eli kone käsittelee niitä nolla arvolla.

Esimerkki:
Lasken vaikka 3 4 (-2), niin tulokseksi tulee 7, eikä 5.

5

4804

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • vaikka näin

      =SUMIF(A1:A3;">0";A1:A3)

      • A

        Pitäisi saada laskettua keskiarvo joukosta, jossa on mukana negatiivisia arvoja, joita ei tulisi huomioida. Vinkkejä?


      • A kirjoitti:

        Pitäisi saada laskettua keskiarvo joukosta, jossa on mukana negatiivisia arvoja, joita ei tulisi huomioida. Vinkkejä?

        soluun mihin haluat tuloksen kaava esim. =PosKeskiarvo(A1:A40)

        moduuliin...

        Function PosKeskiarvo(Alue As Range) As Double
        Dim solu As Range
        Dim i As Integer
        On Error Resume Next
        Application.Volatile True
        For Each solu In Alue
        If solu >= 0 Then
        i = i 1
        PosKeskiarvo = PosKeskiarvo solu
        End If
        Next
        PosKeskiarvo = PosKeskiarvo / i
        End Function


      • kunde kirjoitti:

        soluun mihin haluat tuloksen kaava esim. =PosKeskiarvo(A1:A40)

        moduuliin...

        Function PosKeskiarvo(Alue As Range) As Double
        Dim solu As Range
        Dim i As Integer
        On Error Resume Next
        Application.Volatile True
        For Each solu In Alue
        If solu >= 0 Then
        i = i 1
        PosKeskiarvo = PosKeskiarvo solu
        End If
        Next
        PosKeskiarvo = PosKeskiarvo / i
        End Function

        =AVERAGE(IF(A1:A4>0;A1:A4))


      • M.L.
        kunde kirjoitti:

        soluun mihin haluat tuloksen kaava esim. =PosKeskiarvo(A1:A40)

        moduuliin...

        Function PosKeskiarvo(Alue As Range) As Double
        Dim solu As Range
        Dim i As Integer
        On Error Resume Next
        Application.Volatile True
        For Each solu In Alue
        If solu >= 0 Then
        i = i 1
        PosKeskiarvo = PosKeskiarvo solu
        End If
        Next
        PosKeskiarvo = PosKeskiarvo / i
        End Function

        Jos ei omaa funktiota halua luoda, ja Excelin versio on 2007 tai uudempi, niin tähän on olemassa myös valmis taulukkokaava:
        =KESKIARVO.JOS("A1:A40";">=0")
        (engl. AVERAGEIF)

        Vanhemmila versioilla esim:
        =SUMMA.JOS("A1:A40";">=0")/LASKE.JOS("A1:A40";">=0")

        (SUMIF, COUNTIF)


        -Mika


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Karhuryhmä

      Kellään tarkempaa tietoa miksi ja missä karhuryhmä ollut? Perheväkivaltaa vai huumeperintää kenties taas?
      Jämsä
      28
      3386
    2. Mitä sä pelkäät

      Ettei tää etene?
      Ikävä
      97
      3176
    3. Mitä kaikkea sä

      Olisit valmis tekeen mun eteen vielä? Vai oletko mitään?
      Ikävä
      76
      3014
    4. Raisionkaaren koira hyökkäys

      Taas nähtiin että koiriin ei voi luottaa. Eilen illalla vapaana ollut koira hyökkäsi Raisionkaarella kolmen henkilön kim
      Raisio
      70
      2938
    5. "Mielipide: Äärivasemmiston uhka on otettava vakavasti"

      Demokratia näyttäisi olevan Halla-aholle enemmänkin välttämätön paha kuin tavoiteltava asia. Väkivallan ihannointi ja m
      Maailman menoa
      53
      2881
    6. Tapa jolla kohtelit minua viimeksi miellytti erityisesti

      Osaat huomioida kauniisti ja katsot aina tilanteita yhteisen hyvän kannalta. Sitä arvostan erityisesti.
      Ikävä
      86
      2658
    7. Ei me saada toisiamme

      Ei vaan saada. On vain haaveita ja uunelmia
      Ikävä
      35
      2470
    8. Mikä on luonteesi parhain ominaisuus

      ja mikä huonoin?
      Ikävä
      57
      2341
    9. Satuit vain olemaan

      Ensimmäinen joka avasi minussa sen nähdyksi ja rakastetuksi tulemisen puolen. Pitäisi vain muistaa että et ole ainoa. Se
      Ikävä
      43
      2195
    10. Vielä ei ainakaan

      Kukaan muu tunnu miltään sun jälkeen. Olit niin ainutlaatuista
      Ikävä
      32
      1953
    Aihe