Random-loop exceliin.

Anonyymi

Pystyykö excelin random arvoille tekemään loopin? Esim. Soluun A1 randomluku ja soluun b1 laskuri joka summaisi yhteen a1 satunnaisluvut. Tämän lisäksi c1 oleva luku määrittäisi monesti randomluku ajettaisi.

Esim. jos c1=100;

a1 randomluku vaihtuisi 100kertaa

Ja b1 laskisi nämä kaikki 100 randomlukua yhteen.

8

366

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Rakenna itsellesi yksinkertainen esimerkki logiikan ymmärtämiseksi:

      Avaa Exceliin uusi työkirja ja Tallenna nimellä:
      Tiedoston nimi: summaaluuppi
      Muoto: Excel-työkirja (makrot käytössä)

      --------------------------

      Oletetaan esimerkissä että halutaan ajaa luuppi 10 kertaa:

      Kirjoita soluun A3:
      10

      --------------------------

      Oletetaan esimerkissä että satunnaisluku on aina välillä 1 - 10.

      --------------------------

      Avaa VBA-moduuli näppäinyhdistelmällä Alt F11.

      Tuplaklikkaa vasemmassa ikkunassa: TämäTyökirja

      --------------------------

      Kopioi alla oleva koodi oikealle avautuneeseen ikkunaan:

      Sub SummaaLuuppi()
      Dim i As Integer
      Dim kertaa As Integer
      Range("A2").Select
      Selection.ClearContents
      Range("A3").Select
      kertaa = ActiveCell.Value
      Range("A1").Select
      ActiveCell.FormulaR1C1 = "=RANDBETWEEN(1,10)"
      For i = 1 To kertaa
      Range("A1").Select
      Selection.Copy
      Range("A2").Select
      Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _
      :=False, Transpose:=False
      Next i
      Range("A1").Select
      Selection.ClearContents
      Range("A2").Select
      End Sub

      --------------------------

      Sulje VBA-moduuli valitsemalla File / Close and Return to Microsoft Excel.

      --------------------------

      Tallenna luomaasi tiedostoon (summaaluuppi.xlsm) tekemäsi muutokset.

      --------------------------

      Aja summaaluuppi-makro valitsemalla Kehitystyokalut / Makrot / TämäTyökirja.SummaaLuuppi / Suorita

      --------------------------

      Sarakkeessa A2 on makron suorittamisen jälkeen summa kymmenestä satunnaisluvusta väliltä 1-10.

    • Anonyymi

      Tai siten vaan vaikka sarakkeesen A iso läjä funktiota =RAND() allekain (kopioimalla) ja sitten B1 celliin funktio =SUM(OFFSET(A1,0,0,C1,1)) ja C1:ssä on siis haluttu arvo. A sarakkeessa on tietenkin oltava niin monta =RAND() riviä kuin mikä voi enintään olla C1:ssä olevan luvun maksimiarvo,

      • Anonyymi

        Ai niin, F9 päivittää sheetin.


    • Anonyymi

      Yksi tapa on tehdä oma funktio, vaikka joku tälläinen

      Function satunnaissumma(lukumäärä)
      Dim summa As Variant
      summa = 0
      If lukumäärä >= 1 Then
      For kerta = 1 To lukumäärä
      summa = summa Rnd
      Next
      End If
      satunnaissumma = summa
      End Function

      Tuota voi käyttää laittamalla soluun

      =satunnaissumma(100).

      Pienellä säädöllä voi lisätä satunnaisluvuille ala- ja ylärajatkin. Vinkkiä rajojen asetukseen https://www.techonthenet.com/excel/formulas/rnd.php

      • Anonyymi

        Suuret kiitokset avusta, funktio toimi mainiosti. Minulle tuli vielä mieleen, onnistuuko funktiolla laskemaan kuinka monta kertaa satunnaisluku on yli halutun arvon. Siis jos A1=satunnaisluku B1= 0 jos A1<0,3 ja muuten 1. Lisäksi solu C1 kertoisi kuinka monta kertaa kuinka monta kertaa A1 on ollut yli 0,3 esimerkiksi kymmenestä ajosta.


      • Anonyymi
        Anonyymi kirjoitti:

        Suuret kiitokset avusta, funktio toimi mainiosti. Minulle tuli vielä mieleen, onnistuuko funktiolla laskemaan kuinka monta kertaa satunnaisluku on yli halutun arvon. Siis jos A1=satunnaisluku B1= 0 jos A1<0,3 ja muuten 1. Lisäksi solu C1 kertoisi kuinka monta kertaa kuinka monta kertaa A1 on ollut yli 0,3 esimerkiksi kymmenestä ajosta.

        Funktio palauttaa vain yhden arvon. Voit määritellä moduliin public-muuttujan, johon satunnaissumma-funktio laskee tuon tiedon. Voit tehdä toisen funktion, joka palauttaa em. muuttujan arvon.


      • Anonyymi
        Anonyymi kirjoitti:

        Funktio palauttaa vain yhden arvon. Voit määritellä moduliin public-muuttujan, johon satunnaissumma-funktio laskee tuon tiedon. Voit tehdä toisen funktion, joka palauttaa em. muuttujan arvon.

        Käytttäjän laatima 'Array Formula' palauttaa haluttaessa kaksi tai hyvinkin monta arvoa (en tiedä mikä on yläraja). Hyvä ohje: http://www.cpearson.com/Excel/ArrayFormulas.aspx


      • Anonyymi
        Anonyymi kirjoitti:

        Suuret kiitokset avusta, funktio toimi mainiosti. Minulle tuli vielä mieleen, onnistuuko funktiolla laskemaan kuinka monta kertaa satunnaisluku on yli halutun arvon. Siis jos A1=satunnaisluku B1= 0 jos A1<0,3 ja muuten 1. Lisäksi solu C1 kertoisi kuinka monta kertaa kuinka monta kertaa A1 on ollut yli 0,3 esimerkiksi kymmenestä ajosta.

        Kun on pienistä määristä kyse niin tuollaiset on nopeinta tehdä sheetillä, esimerkiksi:

        =COUNTIF(A1:A100,"<0.3")

        laskee alueen A1:A100 sisältämien niiden cellien määrän, joissa kaikissa on funktio

        =RAND()

        joiden arvo on alle 0,3.

        Bonuksena voi helposti luoda erilaisia graafeja ja voi helposti käyttää Excelin tilastomatemaattisia funktiota analyysejä varten.


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

    Luetuimmat keskustelut

    1. Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?

      Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä
      Arvot ja etiikka
      57
      11877
    2. Sanna Marin vetänyt leukoja 11 kertaa

      Tästähän oli joskus polemiikkia, kun muistaakseni lupasi kymmenen tai jotain vedellä. No nyt niin on, ainakin omien san
      Maailman menoa
      49
      4906
    3. Sosiaalidemokratia romahtanut kautta maailman

      nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie
      Maailman menoa
      293
      3009
    4. Miksi Seta ja Sofia Virta ei vaadi muslimeita kunnioittamaan priden-arvoja?

      Kuten tiedetään niin islam ei hyväksy sitä mitä pride edustaa. Seta-pomo Mikkonen nosti hirveän äläkän kun yksi tepsin
      Maailman menoa
      187
      2885
    5. Kuvaile kaivattusi

      ulkonäkö. Asiattomatkin kommentit saa laittaa. -🏚️
      Ikävä
      130
      2006
    6. Farmi Suomi: Kokeeko Frederik, 81, saman kohtalon kuin ikämies Danny?

      Danny, musiikkineuvos Ilkka Lipsanen, nähtiin mukana Farmi Suomi -realityssä v. 2024. Danny teki yllätysratkaisun ja tuo
      Tv-sarjat
      20
      1305
    7. Sosialismia Tampereella: Virallinen ilmiantolinja avautuu kaupungissa

      Nyt siis mennään mansessa ihan justiinsa samaan malliin kuin entisessä Neuvostoliitossa, jossa saattoi ilmiantaa naapuri
      Maailman menoa
      21
      1194
    8. Kirjoita

      … jotakin minkä vain kaivattusi tietää
      Ikävä
      95
      1114
    9. 40 vuotta töitä paiskinut ja 3 vuotta työttömänä mamuna Suomessa, sama eläke

      Jokin mättää. Eläkettä ei pidä maksaa lainkaan mamuille jos työhistoriaa ei ole vähintään 10 vuotta takana.
      Maailman menoa
      214
      1107
    10. En luota sinuun

      en edelleenkään yhtään tiedä oletko lintu vai kala vai kalavale. Ja ilmeisesti haluat pitää sen niin, syitä voi vain arv
      Ikävä
      70
      921
    Aihe