virtuaalikuvaaja

käyrästä_luku

Tämä on tietysti tyhmä kysymys, joko itestään selvä tai täysin mahdotonta.
Siis, jos taukukoin x- ja y-akselin tietoja joukon sarakkeiden riveille, näistä muodostuu virtuaalisen kuvaajan lähtötiedot.
Kysymys on, voinko jollain funktiolla hakea, jollakin x-akselin mielivaltaisella väliarvolla sitä vastaavaa arvoa y-akselilta. Funktio ikääkuin "katsoisi" kuvaajasta toisen akselin lukeman.

8

177

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • trendikäsviivaaja

      En tiedä onko tämä se mitä haet, mutta näin ainakin löytää kaavan jolla voi laskea x vastaavan y arvon.
      Kun olet piirtänyt kaavion, klikkaa "viivaa" ja valitse "Lisää trendiviiva". Aukeaa ikkuna "Trendiviivan muotoileminen". Trendiviiva asetukset-välilehdellä ruksaa sieltä alhaalta kohta "Näytä kaava kaaviossa". Trendiviivan yläpäähän ilmestyy kaava (y=....) jolla voi laskea y:n arvon. Anna johonkin soluun mielivaltainen x arvo ja siihen viereiseen soluun sitten lasket y tuolla kaavalla. Voit myös lisätä tuohon kaavioon nämä uudet arvot uutena sarjana. Näin näet mihin nämä "mielivaltaiset arvot" sijoittuu kaaviossa.
      Tuon trendiviivan voi sitten poistaa "häiritsemästä".

      • käyrästä_luku

        Tuollaisen kaavan se tyrkkäsi: y=-93,025x 1691,2 mutta ei se mitään järkeviä arvoja tuottanut kun yritin sitä kokeilla.


    • Tämmöinen

      Funktio intpl etsii murtoviivalta x:ää vastaavan y-arvon. Se toimii myös toisinpäin, eli löytää y:tä vastaavan x-arvon. Silloin toiseen parametriin tulee y-arvot ja kolmanteen x-arvot. Rajoituksena on vain, että y-arvojen on oltava koko matkalla joko nousevia tai laskevia.

      Function intpl(X As Double, Xa As Variant, Ya As Variant) As Double
         
         l = 0
         Ux = Xa.Count
         Uy = Ya.Count
         
         If Ux < Uy Then u = Ux Else u = Uy
         
         ReDim xarvo(u 1)
         ReDim yarvo(u 1)
         arvo = 0
         j = 0
         For i = l To u
            If Application.WorksheetFunction.IsNumber(Ya(i)) Then
               j = j 1
               xarvo(j) = Xa(i)
               yarvo(j) = Ya(i)
            End If
         Next i
         
         n = j
         If X < xarvo(1) Then
            result = yarvo(1)
         ElseIf X > xarvo(n) Then
            result = yarvo(n)
         Else
            For i = 0 To n - 1
               If X <= xarvo(i 1) Then
                  dx = xarvo(i 1) - xarvo(i)
                  result = (yarvo(i 1) * (X - xarvo(i)) yarvo(i) * (xarvo(i 1) - X)) / dx
                  Virhe = ""
                  Exit For
               End If
            Next i
         End If
         intpl = result
      End Function

      • käyrästä_luku

        Ohjelmakoodin ymppääminen taulukkoon on minulle ihan tuntematon alue...


      • Tämmöinen

        Paina Alt-F11 – aukeaa VBA-editori
        Valikosta: Insert – Module
        Liimaa yllä oleva funktio siihen.
        Se toimii samaan tapaan kuin esim. vakiofunktio FORECAST
        Talletus muodossa *.xlsm, jotta makrofuktio tulee mukaan.


      • käyrästä_luku

        Kai se jotenkin pitää nimetä ja tallentaa että sen saa käyttöön, eikä tuommoista .xlsm tallennusmuotoa ole käytettävissä?


      • Tämmöinen
        käyrästä_luku kirjoitti:

        Kai se jotenkin pitää nimetä ja tallentaa että sen saa käyttöön, eikä tuommoista .xlsm tallennusmuotoa ole käytettävissä?

        Toimii se tallettamattakin, mutta kun talletat, on valittava sellainen tiedostomuoto, joka säilyttää myös makrot. Talletusmuoto valitaan nimiruudun alapuolella olevista vaihtohdoista. Oletus ja ensimmäinen vaihtoehto on *.xlsx, toinen on *.xlsm. Myös kaksi seuraavaa *.xlsb ja vanhentunut *.xls käyvät.


      • käyrästä_luku
        Tämmöinen kirjoitti:

        Toimii se tallettamattakin, mutta kun talletat, on valittava sellainen tiedostomuoto, joka säilyttää myös makrot. Talletusmuoto valitaan nimiruudun alapuolella olevista vaihtohdoista. Oletus ja ensimmäinen vaihtoehto on *.xlsx, toinen on *.xlsm. Myös kaksi seuraavaa *.xlsb ja vanhentunut *.xls käyvät.

        Nyt huomasinkin, sillä on jo nimi, intpl sisäänrakennettuna.
        Täytyypä alkaa testailemaan, kiitos!


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

    Luetuimmat keskustelut

    1. Järkyttävä tieto Purrasta

      Purra tapasi nykyisen miehensä täällä. Suomi24:ssä! Tulipa likainen olo. Nyt loppuu tämä roikkuminen tällä palstalla.
      Maailman menoa
      218
      4270
    2. Näin asia on

      Tiedän ettei hän koskaan aio lähestyä minua eikä niin ole koskaan aikonutkaan, eikä lähesty ja enkä minä enää tee sitä k
      Ikävä
      22
      3299
    3. Mikseivät toimittajat vaadi Orpoa vastuuseen lupauksistaan

      Missä ne 100.000 uutta työpaikkaa muka ovat? Eivät yhtään missään. Näin sitä Suomessa voi puhua ja luvata mitä sattuu. E
      Maailman menoa
      261
      1908
    4. Taas varoitusta lumesta ja jäästä

      Ai kauhea! Vakava säävaroitus Lumi-/jäävaroitus Varsinais-Suomi, Satakunta, Uusimaa, Kanta-Häme, Päijät-Häme, Pirkanmaa,
      Maailman menoa
      5
      1317
    5. Aavistan tai oikeastaan

      tiedän, että olet hulluna minuun. Mutta ilman kommunikointia, tällaisenaan tilanne ja kaikki draama ovat mun näkökulmast
      Ikävä
      38
      1207
    6. Mistä erotat onko joku kiinnostunut vai muuten mukava?

      Voi sekaantua yleiseen ystävällisyyteen vai voiko?
      Ikävä
      158
      1148
    7. Poliisi tahtoo pääsyn 4 miljoonan suomalaisen sormenjälkiin.

      https://www.is.fi/digitoday/art-2000011009633.html Tämä sormenjälkiin poliisin pääsy on erittäin tärkeä rikollisten kiin
      Maailman menoa
      96
      855
    8. Uskotko että halaatko

      Kaivattuasi koskaan vai et?
      Ikävä
      63
      745
    9. Tiistaipäivää pakkastakin on

      Hyvää päivää huomentakin. Olin vähän kaupungilla käymässä 😊❤️🌞❄️☕
      Ikävä
      176
      730
    10. Sulla on upeat pakarahalihakset

      todella hyvä muoto...
      Ikävä
      30
      727
    Aihe