Muuttuvan tilanteen kuvaaja

µrä

Moikka excel-gurut, tarvitsisin apua seuraavanlaiseen ongelmaan:

Minulla on dataa tuhansista nimikkeistä. Jokaisella nimikkeellä joko on tai ei ole ominaisuutta x. Olen tehnyt summarivin, joka laskee kuinka monella nimikkeellä on x, ja saanut tuloksen a. Dataa aletaan päivittää niin, että yhä useammille nimikkeille tulee ominaisuus x, eli a:n arvo kasvaa.

Miten saan piirrettyä päivitysten edistymisestä kuvan niin, että excel lukitsee alkuarvon a ja piirtää seuraavat arvot suhteessa aikaan? Tällä hetkellä saan piirrettyä vain muuttuvan pisteen...

Tai vaihtoehtoisesti, miten tätä ongelmaa kannattaa lähestyä loogisemmin...

Kiitos!

2

78

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • päivittäjä

      Onko sinulla siinä päivämäärä saraketta, johon laitat päivämäärän aina kun nimike saa x-arvon. Jos on, niin laske LASKE.JOS-funktiolla kuinka monta "äksää" on tullut vaikka kuukausittain tai miten usein päivitystä sitten tarvitsekkaan.

    • simppeli ratkaisu
      oletetaan, että sulla vaikka 2000 nimikettä sarakkeessa A1:A2000 ja ja luvut sarakkeessa B1:B2000(vain esimerkkinä, voi olla kuinka monta vaan )

      Kuvaajan tiedot vastaavasti E1:F20000
      Kun aloitat kuvaajan tekoa niin laita soluun E1 =1 tai montako niitä lukuja onkaan alkuhetkellä ja vastaava summa soluun F1

      tee kaavio data-alueesta esim. E1:F2000
      Ala sitten syöttömään lukuja nimikkeille ja kaavio päivityy sitä mukaan.

      mallikoodissa lisää nyt pvm ja kpl, mutta hipsaamalla sen rivin ja poistamalla riviltä
      ' Range("E10000").End(xlUp).Offset(1, 0) = Application.WorksheetFunction.Count(Range("B:B"))

      hipsun, saat kpl ja summakaavion.

      taulukon moduuliin...

      Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect(Target, Range("B:B")) Is Nothing Then
      ' eiintymien määrä
      ' Range("E10000").End(xlUp).Offset(1, 0) = Application.WorksheetFunction.Count(Range("B:B"))
      ' päivämäärä
      Range("E10000").End(xlUp).Offset(1, 0) = Date
      Range("E10000").End(xlUp).Offset(0, 1) = Application.WorksheetFunction.Sum(Range("B:B"))
      End If
      End Sub


      Keep EXCELing
      @Kunde

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

    Luetuimmat keskustelut

    1. Kylläpä on nautinnollista taas tämä palstan vassari valitus!

      Lähes jokainen avaus on vassareiden kitinää ja valitusta. Eikö se tarkoitakin, että silloin asiat menee maassamme parem
      Maailman menoa
      101
      3248
    2. Palkansaajilta kupattiin 27,5 mrd euroa työeläkkeisiin

      Jo pelkän himmelin toimintakulut olivat 400 miljoonaa euroa, jolla olisi mukavasti tuottanut myös sote-palveluja hyvinvo
      Maailman menoa
      1
      2603
    3. HS: persujen v. 2015 turvapaikanhakijoista alle puolet töissä

      Aikuisina Suomeen tulleista ja myönteisen päätöksen saaneista vain 42 prosenttia oli vuonna 2023 töissä, vaikka he ovat
      Maailman menoa
      75
      2506
    4. Persut muuten hyväksyvät 2 + 8 mrd. euron maatalous- ja yritystuet

      Vaikka molemmat tukimuodot tiedetään haitallisiksi, koska ovat käytännössä pelkkää säilyttävää tukea, eivätkä kannusta k
      Maailman menoa
      64
      1463
    5. Mikä kaivatussasi herätti mielenkiintosi

      Kun tapasitte ensi kerran? Ulkonäössä? Luonteessa tai olemuksessa? Kuinka nopeasti mielenkiinto muuttui ihastukseksi?
      Ikävä
      91
      1445
    6. Valkoinen Golf

      Kukahan on tämä ukko, joka työkseen kyylää pienen ässän asiakkaita viikon jokaisena päivänä.
      Kuhmo
      16
      1035
    7. Martina Aitolehti podcastissa: Ero

      Martina Aitolehti podcastissa: Ero Martina Aitolehti kertoi BFF-podcastin https://www.iltalehti.fi/viihdeuutiset/a/696
      Kotimaiset julkkisjuorut
      184
      955
    8. Kaikki ovat syntisiä!!!

      Näin täällä koko ajan vakuutellaan uskovaisten toimesta. Myös Päivi Räsänen on toistanut tätä samaa matraa jatkuvasti. N
      Luterilaisuus
      333
      953
    9. Moottorisahalla kauppaan

      Missäs päin kaupunkia tämä yöllä moottorisahalla kauppaan yrittänyt asiakas askaroi? https://poliisi.fi/-/mies-yritti-s
      Kajaani
      10
      857
    10. Jos olisit kaivattusi

      Kanssa kahdestaan samassa tilassa niin miten kävisi
      Ikävä
      50
      824
    Aihe