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

397

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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 ?


      • 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ä.

    Luetuimmat keskustelut

    1. Olet toisen kanssa

      ...ja minä yhä vain sinua kaipaan. Tiedän ettet ole onnellinen siellä. Älä hukkaa aitoa onnea ja rakkautta hukkaan vain
      Ikävä
      277
      2183
    2. Näytit taas lihoneen.

      Tynnyri se vaan kasvaa.
      Ikävä
      45
      1959
    3. Immu otti pataan

      Olen pettynyt, hänen piti viedä Stagalaa kuin litran mittaa - mutta kuinka kävikään? Voi hemmetti sentään.... Ääääääh!
      Kotimaiset julkkisjuorut
      114
      1872
    4. Kuka teistä on paras nainen

      A-nainen? J-nainen? K-nainen? M-nainen? S-nainen? Vai kenties joku muu...? 😊
      Ikävä
      69
      1542
    5. Osaako joku selittää tätä

      Että miksi mulle on joka toinen ventovieras ihminen tyly ainakin ilmeillään ja eleillään?
      Ikävä
      85
      1389
    6. Onko jotain mistä

      Olet huolissasi kaivattusi suhteen?
      Ikävä
      78
      1294
    7. Jos me joskus nähtäisiin

      niin ei kai sen vielä tarvitsisi merkitä sen enempää? Ja voihan olla ettei kumpikaan enää siinä vaiheessa edes haluaisi
      Ikävä
      103
      1283
    8. Persun suusta:"Köyhät on luusereita ja ansaitsevat köyhyyden"

      Ministeri Juuston apulainen näin uhoaa. Mitäs siinä. Kyllä on jo tiedetty muutaman vuoden hallitustyön pohjalta että per
      Lieksa
      220
      1194
    9. Koska vietät

      Yhteisen yön kaivattusi kanssa?
      Ikävä
      57
      1165
    10. Näetkö feminismin uhkana

      Vai mahdollisuutena kun deittailet naisia? Mitä miehet mieltä feminismistä?
      Ikävä
      179
      1029
    Aihe