Keskihajonta?

simerkki hukassa

oletus A1 –sarakkeesta A100 sarakkeeseen lukuja
B1-sarakkeesta B100-sarakkeeseen nimiä (teppo, teuvo, tommi ja tatu)

kuinka kirjoitan kaavan, joka laskee keskihajonnan esim. tepon lukuarvoille?

4

407

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      oletuksena nyt tiedot A1:B100 soluissa
      soluun johon haluat tuloksen laita kaava
      =OmaKeskihajonta("teuvo";"B1:B100")

      ja moduuliin...

      Public Function OmaKeskihajonta(Nimi As String, Hakualue As String)
      Dim Alue As Range
      Set Alue = Range("A1")
      For Each solu In Range(Hakualue)
      If solu = Nimi Then
      Set Alue = Application.Union(Alue, solu.Offset(0, -1))
      End If
      Next
      OmaKeskihajonta = Application.WorksheetFunction.StDev(Alue)
      End Function

    • ...

      {=STDEV(IF(B1:B100="teppo";A1:A100; 0))}

      paina ctrl shift enter kaavan syöttämisen jälkeen (ilman {} sulkuja)

      • utelias

        kokeilin noita kumpaakin ja niistä tulee eri tulos samalla materiaalilla. Kumpikohan on oikeassa ?

      • kunde
        utelias kirjoitti:

        kokeilin noita kumpaakin ja niistä tulee eri tulos samalla materiaalilla. Kumpikohan on oikeassa ?

        jos tiedot A1-> eteenpäin. Omassa funktiossani en ollut ottanut huomioon, jos tiedot muualla kuin A1 alkaen(lämpö herpaannuttaa keskittymisen välillä). Alla korjattu versio
        KIITOS tarkkaivaisuudestasi utelias!

        Public Function OmaKeskihajonta(Nimi As String, Hakualue As String)
        Dim Alue As Range
        Set Alue = Range(Hakualue).Range("A1").Offset(0, -1)
        For Each solu In Range(Hakualue)
        If solu = Nimi Then
        Set Alue = Application.Union(Alue, solu.Offset(0, -1))
        End If
        Next
        OmaKeskihajonta = Application.WorksheetFunction.StDev(Alue)
        Alue.Select
        End Function

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. En minä kyllä enää odota sinua

      Olet siellä sen harmaan kanssa. Niin, annoit minun nähdä lämpimät tunteesi siitä huolimatta. Se merkitsi kyllä paljon. O
      Ikävä
      40
      2042

    2. Taas pedofiliatuomio Haapaveelle

      Vastenmielisiä ja vakavia rikostapauksia pikkupaikkakunnan alueellekin näyttää riittävän. Tämän alan rikoksien tuomiot
      Haapavesi
      41
      1837

    3. Jos joku luulee että kaikki käy

      Sanon vain tämän. Minun kanssani ei neuvotella. Minun kanssani eletään tasavertaisesti. Jos se on liikaa, niin ovi rinn
      Ikävä
      61
      1525

    4. Joka kolmas työtön on työkyvytön

      Viime vuonna työnhakuvelvoitteen ulkopuolella oli noin kolmannes työttömistä työnhakijoista. Huhheijaa, mihin suomalais
      Maailman menoa
      183
      1456

    5. Sakin hivutus - ilmiö

      Miten tuollainen tuollainen ilmiö kuin ”sakin hivutus” syntyy? Mitä syitä ilmiön syntymiseen tarvitaan? Onko sakissa jok
      80 plus
      69
      1251

    6. Ei ole rohkeutta tulla jututtamaan

      Voidaan me nähdä ja tervehtiä, sitäkin harvoin, mutta iso kynnys on edes mennä lähelle ja kysyä kuulumisia. Ymmärrät var
      Tunteet
      8
      1231

    7. Julkinen saunatilanne Haapavedellä, tämä on täyttä paskaa!

      Eilen Haapaveden uimahallin saunassa koettu tilanne oli täysin käsittämätöntä ja helvetin järkyttävää. Ladyboy harjoitti
      Haapavesi
      19
      1003

    8. Mitä tapahtuu?

      Mitä säpäkän risteyksessä on tapahtunut kun poliiseja, ambulansseja ja kopteri paikalla?
      Outokumpu
      18
      975

    9. Me ei voida olla yhdessä

      Järki päähän ja realiteetit huomioon ottaen.
      Ikävä
      63
      954

    10. Kuhmon K-kaupan vanhenevat hapannaamat kassoilla

      Pitemmän aikaa olen ihmetellyt kaverin kanssa miksi Kuhmon K-kaupassa on aina tympeimmät kassattöntekijät? Kesällä tulee
      Kuhmo
      14
      885
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt