SUM(OFFSET(COUNTA ???

P.P.A.

Terve!
Olisi pieni ongelma "iso ongelma".
Taulukosta haetaan summaa esimerkissä 5:stä viimeisestä sarakkeesta tällä kaavalla:

=SUM(OFFSET($A$1;COUNTA(A:A)-5;0;5;1))

Toimii oikein, mutta kun taulukkoon tulee loppuun, väliin ja sinne tänne arvoja 0, nämä pitäisi saada poissuljettua laskuista niin että laskenta alkaa aina viimeisestä täydestä numerosta, ja että vain täydet numerot 5 viimeisintä lasketaan.

Luvut esim -10(miinus) 10(plus) väliltä huomiodaan. Nyt tuo kaava aloittaa laskemisen aina viimeisestä sarakkeesta jos siellä on jotain vaikka se nolla ja laskee kaikki sarakkeet missä on 0.

Esim Sarake A

6
10
6
0
6
-6
-6
0
-10
0
0
6
6
0
10
0



Olisko apuja?

6

522

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ...

      Function sum5(alue As Range)

      m = 5
      sum5 = 0
      vika = alue.End(xlDown).Row
      For r = vika To 1 Step -1
      luku = alue.Cells(r)
      If luku 0 And luku = -10 Then
      sum5 = sum5 luku
      m = m - 1
      If m = 1 Then Exit For
      End If
      Next r

      End Function

      käyttö =Sum5(A:A)

      • P.P.A.

        Kiitos funktiosta ja vaivannäöstä, nyt on vain isompi pulma se ettei VBA ole hallussa lainkaan ja siksi joudun käyttämään näitä "tavisten" kaavoja.

        Olisko antaa vihjettä mihin kohtaan kaavaan kannattaisi alkaa yrittämään IF ehtoja , ( COUNTAIF ? )

        =SUM(OFFSET($A$1;COUNTA(A:A)-5;0;5;1))


      • ...
        P.P.A. kirjoitti:

        Kiitos funktiosta ja vaivannäöstä, nyt on vain isompi pulma se ettei VBA ole hallussa lainkaan ja siksi joudun käyttämään näitä "tavisten" kaavoja.

        Olisko antaa vihjettä mihin kohtaan kaavaan kannattaisi alkaa yrittämään IF ehtoja , ( COUNTAIF ? )

        =SUM(OFFSET($A$1;COUNTA(A:A)-5;0;5;1))

        Otsikossa kaikki.


      • P.P.A.
        ... kirjoitti:

        Otsikossa kaikki.

        Tietysti otsikon sääntö toimii mutta ei haluamallani tavalla.


        Kävinkin jo kirjakaupasta hakemassa rakenna VBA-makroja. Kyllä tuo antamasi makro tulee hyötykäyttöön, voin ilmeisesti kopioida sen suoraan. Mutta kun vasta muutama tunti sitten on hommattu kirja, alkeissa ollaan kaiken suhteen.


        Kiitos ja mukavaa kesää.


    • VBA:lla ihan piece of cake, mutta normaalikaavoilla aika paha...

      ei toimi ennenkuin 5 ei 0-arvoa on alueella. Muuta aluetta tarvittaessa, tietenkin alueen vosi vielä muuttaa dynaamiseksi,mutta jääköön se sun tehtäväksi, koska sen jo osaatkin

      siis haluamaasi soluun kaava
      =SUM(OFFSET($A$1;LARGE(IF(ISNUMBER($A$1:$A$100);IF($A$1:$A$1000;ROW($A$1:$A$100)));5)-1;0;100;))

      ja muista, että kaava on matriisikaava,joten kaavarivillä ENTERin sijasta CTRL SHIFT ENTER

      Keep Exceling
      @Kunde

      • P.P.A.

        heille ken sen osaavat. Ostin ensimmäisen kirjan eilen, onhan siinä ideaa, en vain ymmärrä sitä ideaa. Tiedostin kyllä että jossain vaiheessa on se kieli opeteltava, eräpäivää on vaan siiretty.

        Juu kyllä tarvittavat muutokset pystyn tekemään jos tarvetta on. Kaava tulee tarpeeseen ->..heti..


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

    Luetuimmat keskustelut

    1. Kaipaatko sinä

      Yhtään meidän katseita
      Ikävä
      205
      2394
    2. Törkeä eläinsuojelurikos Sonkajärvellä

      Pohjois-Savossa Sonkajärvellä noin 40 kissaa ja reilut 10 koiraa on jouduttu lopettamaan kaltoinkohtelun vuoksi, kertoo
      Sonkajärvi
      40
      1582
    3. Jotkut ihmiset pelkäävät syöpää sairastavaa

      On hauskaa, kun kertoo jollekin, että "minulla on syöpä". Jotkut käyttäytyvät kuin se olisi tarttuva tauti. Eivät uskall
      Sinkut
      135
      1232
    4. Lavrov suivaantui Stubbille perustellusti.

      Lavrov perusteli suivaantumistaan tosiasioilla Suomen tarinasta sotiemme jälkeen, tutkija Tynkkynen ja pankkihenkilö Sol
      Maailman menoa
      288
      1028
    5. Se ei ihan oikeasti vaatisi kuin yhden

      Tekstiviestin... Jos rakastat minua vielä toivoisin että laittaisit minulle viestiä. Rakastatko? Oletko oikeasti niin pe
      Ikävä
      56
      982
    6. Sukupuolia on vain kaksi- kohukassista tuli kova tuomio perheenisälle oikeudessa.

      https://www.iltalehti.fi/kotimaa/a/4d4db0d9-4dda-4ba6-a699-25d725683ad6 Miten näin normaalista kassissa olevasta tekstis
      Maailman menoa
      302
      963
    7. Kääminsä polttanut taksi suomussalmella

      Vieläkö sillä hermonsa menettäneellä hulluja ylinopeuksia ajavalla asiakkaansa haukkuvalla( jos ajat paska kyydin hänen
      Suomussalmi
      20
      912
    8. olisit voinut mies edes

      Pyytää anteeksi 🙏🫶
      Ikävä
      55
      906
    9. Jorma Uotinen avaa sanaisen arkkunsa TTK-miesparista ja koko uudistuksesta: "Sehän on..."

      Tanssii Tähtien Kanssa -parketilla nähdään ensimmäistä kertaa Suomessa tanssiparina miespari kauden alusta asti. Mikko S
      Tanssii tähtien kanssa
      19
      774
    10. Aina ku nään sun kuvan

      Tekis mieli kirjoittaa viesti: Moi kulta, on ikävä❣️🤗 ihan noin vain, lyhyt ja ytimekäs 😁🤭
      Ikävä
      58
      763
    Aihe