Kaavion päivitys

ongelmana

Haluaisin ensivuoden alusta alkaa pitämään lämpötiloista kirjaa.
Sivun yläosassa minulla on esim. tammikuun lämpötiloista kaavio, johon tulee
jatkuva käyrä 3h välein koko kuusta. Se on OK, mutta ongelmaksi tulee tietojen
syöttö tuohon kaavioon. Lämpötilat merkitsen ylös 3h välein.
Ne saan sääasemasta, joka tallentaa ne 3h väliajoin. Nuukuuksissani
en hanninut ostaa semmoista missä olisi valmis tietokone-yhteys.
Eli tiedot on näin:
B20 = 1.1.2008
C20:J20 sisältää lämpötilat 3h välein
K20 =KESKIRVO(C20:J20)
B21 = 2.1.2008
jne...
Kaavio ei anna vetää lähdearvoja suoraan taulukosta Ctrl pohjassa
rivittäin kuin 15 ensimmäistä.
Ratkaisin ongelman niin, että kirjoitan B52:B299 samat tiedot alekkain
eli trasponoin ne rivin kerrallaan ja tien kaavion sitten tuosta B52:B299 alueesta.

Nyt sitten vasta se todellinen ongelma (toivottavasti jaksoitte lukea tänne asti):
Miten voin laittaa kaavat valmiiksi B52:B299, että ne hakee tiedot vastaavan
arvon solusta. On vaivalloista aina käydä viemässä tiedot päivittäin, varsinkin loppukuussa,
yli 200 riviä alaspäin.
Laitoin niihin kaavan esim.B52 =JOS(C20="";"";C20), eli jos "alkuperäisessä solussa" ei ole
arvoa, näkyy tämä "kopiosolu" tyhjänä, mutta nyt kaaviossa kumminkin kaikki tyhjät solut
näyttävät arvoa 0, eli koko loppukuun olisi nollakeliä. Miten muutan kaavaa, että ko. solun arvo
päivittyy kaaviossa vasta sitten kun siihen tulee tietoa.
Jos jollakin on parempi ehdotus tietojen kirjaamiseen, otetaan kaikki neuvot
kiitollisena vastaan. Makrotkin tulee kyseeseen.

Niin ja sitten vielä. Tuo päivän keskilämpötila.
Miten muutan kaavaa, että voisin vetää ne valmiiksi kuun loppuun asti, ettei
tulisi "risuaitaa" vielä tyhjinä oleville päiville.

6

1561

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • juhakorkeapudas

      Taulukkosi vaikuttaa kovin sekavalta.

      "Kaavio ei anna vetää lähdearvoja suoraan taulukosta Ctrl pohjassa rivittäin kuin 15 ensimmäistä."

      - Mitä tämä tarkoittaa? Etkö voi vaan käydä muuttamassa taulukon asetuksia ja määritellä siihen uusia rivejä sen sijaan, että vedät niitä hiirellä?

      "Ratkaisin ongelman niin, että kirjoitan B52:B299 samat tiedot alekkain
      eli trasponoin ne rivin kerrallaan ja tien kaavion sitten tuosta B52:B299 alueesta."

      - Tämähän on turhaa kun toimit ed. kohdan mukaan.

      "Tuo päivän keskilämpötila.Miten muutan kaavaa, että voisin vetää ne valmiiksi kuun loppuun asti, ettei tulisi "risuaitaa" vielä tyhjinä oleville päiville."

      - Lisää kaavaan ehtolause; jos tulos on virhe, näytetään tyhjä solu.

      =JOS(ONVIRHE(KESKIRVO(C20:J20));"";KESKIRVO(C20:J20))

    • harkita
      • vettä myllyyn

        Sanotaanhan,että yksi kuva vastaa tuhatta sanaa.
        Linkissä on kuva mitä ajan takaa, eli...

        http://www.munkuvat.org/kuvat/56914.jpeg

        ... ongelmani on ainoastaan se. Miten saan tuohon
        Sarja1:een mahtumaan nuo kaikki tammikuun 31 riviä.
        Alku on helppo, vedän vain 1. päivän lämmöt hiirellä, Ctrl pohjaan ja seuraava rivi jne...
        Mutta stoppi tulee 16 pv, Excel ei ota enempää vastaan.

      • voisi olla
        vettä myllyyn kirjoitti:

        Sanotaanhan,että yksi kuva vastaa tuhatta sanaa.
        Linkissä on kuva mitä ajan takaa, eli...

        http://www.munkuvat.org/kuvat/56914.jpeg

        ... ongelmani on ainoastaan se. Miten saan tuohon
        Sarja1:een mahtumaan nuo kaikki tammikuun 31 riviä.
        Alku on helppo, vedän vain 1. päivän lämmöt hiirellä, Ctrl pohjaan ja seuraava rivi jne...
        Mutta stoppi tulee 16 pv, Excel ei ota enempää vastaan.

        jos pidä kaavion saamista koko kuukauden ajalta tärkeänä eikä muita ratkaisuja tule, että muutat tilaston pystyyn siten, että esim. sarakkeessa A on päivämäärä, sarakkeessa B on kellon ajat, sarakkeessa C on mittaustulokset ja sarakkeessa D keskiarvot. Tällöin päivämäärä olisi joka 8. rivillä, kellonajat ja mittaustulokset olisivat peräkkäisissä soluissa ja keskiarvo olisi päivämäärärivillä.
        Tee kaavio C-sarakkeen arvoista. Kun lisäät uuden päivän tiedot, klikkaa kaavion reuna-aluetta ja muuta kehystettyä kuva-aluetta C-sarakkeessa uuden päivän alueella ja sinulla on kaavio ajantasalla.
        Voit lisätä päivämääriin kaavan 'Ed.päivä 1'. Riittää, että ensimmäinen päivämäärä on syötettävä solu ja saat koko kuukauden päivät kerralla. Keskiarvokaava olisi ensimmäisen päivän kohdalla =JOS(SUMMA(C10:C17)=0;"";KESKIARVO(C10:C17)) kun ensimmäinen päivä kellonaikoineen olisi soluissa A10-C17. Kopioi keskiarvokaava alas jokaisen päivänmäärän riville.
        Tämä tarvitsee tehdä vain kerran. Voit käyttää samaa taulukkoa uuden kuukauden tiedoilla joko päivittämällä ko. taulu tai kopioida se uudeksi tauluksi.

      • hyvää vauhtia
        voisi olla kirjoitti:

        jos pidä kaavion saamista koko kuukauden ajalta tärkeänä eikä muita ratkaisuja tule, että muutat tilaston pystyyn siten, että esim. sarakkeessa A on päivämäärä, sarakkeessa B on kellon ajat, sarakkeessa C on mittaustulokset ja sarakkeessa D keskiarvot. Tällöin päivämäärä olisi joka 8. rivillä, kellonajat ja mittaustulokset olisivat peräkkäisissä soluissa ja keskiarvo olisi päivämäärärivillä.
        Tee kaavio C-sarakkeen arvoista. Kun lisäät uuden päivän tiedot, klikkaa kaavion reuna-aluetta ja muuta kehystettyä kuva-aluetta C-sarakkeessa uuden päivän alueella ja sinulla on kaavio ajantasalla.
        Voit lisätä päivämääriin kaavan 'Ed.päivä 1'. Riittää, että ensimmäinen päivämäärä on syötettävä solu ja saat koko kuukauden päivät kerralla. Keskiarvokaava olisi ensimmäisen päivän kohdalla =JOS(SUMMA(C10:C17)=0;"";KESKIARVO(C10:C17)) kun ensimmäinen päivä kellonaikoineen olisi soluissa A10-C17. Kopioi keskiarvokaava alas jokaisen päivänmäärän riville.
        Tämä tarvitsee tehdä vain kerran. Voit käyttää samaa taulukkoa uuden kuukauden tiedoilla joko päivittämällä ko. taulu tai kopioida se uudeksi tauluksi.

        Kiitos edelliselle vastaajalle. Ehdotuksesi oli oikein hyvä, asia otetaan vakavaan harkintaan ja kiitos siitä KESKIARVO-kaavasta, se oli justiinsa se mitä hain. Tuo edellä annettu ei ainakaan toiminut minulla. Tarkoitukseni oli myös laittaa aina jokaisen päivän kohdalle tapahtumia,jos
        esim. säässä oli jotain erikoista tai muuta tärkeää tapahtui. Tuo alekkain laittaminen hankaloittaa sitten jälkeenpäin tietojen tarkastelua (kova selaaminen sivussa ylös ja alas). Laitan tuohon vielä yhden kuvan, jos jollekulle tulee oivalluksia.

        http://www.munkuvat.org/kuva/57557

        Mutta nyt aletaan viettämään Uutta vuotta ja unohdetaan tämä ongelma vähäksi aikaa. Jotenka
        kaikille ongelmiini vastaamaan vaivautuneille ja
        hyviä neuvoja antaneille:

        HYVÄÄ UUTTA VUOTTA 2008

    • rpo

      Makro kopioi alkuperäisestä tilastosta tiedot sarakkeihin alkaen riviltä 60. Muuta arvoja tarvittaessa.

      Hyvää Uutta Vuotta.

      Sub PäivitäKaavio()
      Application.ScreenUpdating = False
      Sheets("Taul1").Activate
      Range("A60" & ":" & "D65536").ClearContents
      EkaRivi = 20
      Vikarivi = Range("J" & EkaRivi).End(xlDown).Row
      Rivi = EkaRivi 1
      Alkurivi = 60

      For n = EkaRivi To Vikarivi
      Päiväys = Range("B" & n).Value
      Kohderivi = Range("C" & Alkurivi).End(xlDown).Row 1
      If Kohderivi > 65500 Then
      Kohderivi = Alkurivi
      End If
      Range("C" & n & ": J" & n).Copy
      Range("C" & Kohderivi).PasteSpecial Paste:=xlPasteAll, Transpose:=True

      Range("A" & Kohderivi) = Päiväys
      Range("C19:J19").Copy
      Range("B" & Kohderivi).PasteSpecial Paste:=xlPasteAll, Transpose:=True
      Next

      Lr = Range("C65536").End(xlUp).Row
      Kaavionimi = ActiveSheet.ChartObjects.Item(1).Name
      ActiveSheet.ChartObjects(Kaavionimi).Activate
      ActiveChart.SetSourceData Source:=Sheets("Taul1").Range("C" & Alkurivi & ":C" & Lr) _
      , PlotBy:=xlColumns

      Application.CutCopyMode = False
      Range("A1").Select
      End Sub

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Israel aloitti 3. maailmansodan

      https://www.is.fi/ulkomaat/art-2000011297979.html Israel se sitten aloitti näköjään kolmannen maailmansodan.
      Maailman menoa
      461
      2805

    2. Kaksi vuotta

      Sitten mä ihastuin suhun päätä pahkaa, kun meillä klikkasi heti ekasta päivästä lähtien. Et varmasti tunne samoin ja tek
      Ikävä
      15
      2645

    3. Nainen, meidän talossa on säännöt

      1. Mies on aina oikeassa. 2. Ei vastaväitteitä. 3. Mäkättäminen kielletty. 4. Suhde on tärkein. 5. Ei salaisuuksia. 6. E
      Ikävä
      269
      1582

    4. Miksi me ei mies voida edes viestitellä irl?

      En odota enkä vaadi mitään, voitaisiin vain olla yhteyksissä jollain tapaa ihan oikeasti.
      Ikävä
      84
      1184

    5. Raamatun kiroukset ja uhkaukset osoittavat sen ihmisperäisyyden

      "Se sanotaan galatalaiskirjeessä, että jos joku levittää väärää evankeliumia: "...jos joku julistaa teille evankeliumia
      Hindulaisuus
      440
      1121

    6. Oliko Farmi-finaalitehtävät mielestäsi tasaveroisia Lloydin ja Johannan välillä?

      Onnea Farmi-voitosta, Lloyd. Et tainnut olla ihan kaikkien suosikki, mutta puskit voittoon! Oliko finaalitehtävät miel
      Tv-sarjat
      63
      1098

    7. Tekisin mitä vaan että

      Pääsisin eroon susta.
      Ikävä
      156
      960

    8. Rakennetaanko yhdessä?

      Haluaisin rakentaa sun kanssa yhteistä tulevaisuutta❤️ Onko meistä siihen? Huomaan että sulta puuttuu se joku tärkeä elä
      Ikävä
      41
      928

    9. Onko hän elämäsi rakkaus?

      Itse olen sitä mieltä että kyllä se näin taitaa nyt olla
      Ikävä
      56
      889

    10. Mies haluaisin sinun kanssa

      Rakkauslapsen. Hänestä tulisi tosi söpö ja fiksu.
      Ikävä
      79
      875
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt