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.
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.
Vastaukset 6
Vanhimmat
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))
oisko tästä apuja
http://office.microsoft.com/fi-fi/excel/HA011098011035.aspx
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.
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
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