Summan laskeminen ensimmäiseen vapaaseen soluun

Excelhakusessa

Hei,
osaisikohan joku auttaa? Pitäisi tehdä makro, joka laskee sarakkeen luvut ensimmäiseen tyhjään soluun. Eli lukuja on sarakkeessa x-määrä, ja kun nämä luvut loppuvat, pitäisi seuraavan rivin tyhjään soluun laskea nämä solut yhteen. Mitenhän onnistuisi?

5

214

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • moduuliin...
      muuta sarake ja aloitusrivi sopivaksi- nyt A sarake ja etsii ekan tyhjän alkaen A1 solusta


      Sub Summa()
      Dim Vika As Long
      Vika = Range("A1").End(xlDown).Row
      Range("A" & Vika 1) = WorksheetFunction.Sum(Range("A1:A" & Vika))
      End Sub


      Keep EXCEling
      @Kunde

    • Vaihtoehtoinen_tapa

      Helpompaa on laittaa ne summat tietorivien yläpuolelle. Samalta riviltä ne olisi helpompi lukeakin.

    • Välillä ihmetyttää nää helpompi jutut, jos kysytään niin vastaan pyyntöön.
      Tottakai sen voi tehdä monella tapaa ja monestikin kysymyksestä ei edes selviä tarkoituskaan vaan pitää arvailla.
      Vaihtoehtoinen_tapa vaan olettaa, että helpompi... ;-)

      • Vaihtoehtoinen_tapa

        Ei ollu tarkoitus loukata. Toi ehdotus oli kysyjälle. Mun mielestä, jos tietoja tulee eri sarakkeisiin vaihteleva määrä, on ehdottomasti parempi laittaa ne summat yms. lasketut jutut tietojen yläpuolelle. Kun samat asiat on aina samallä rivillä, niitä ei tarvii etsiä sieltä täältä.


    • Excelhakusessa

      Kiitos!! tässä tapauksessa ei voi laittaa summaa yläpuolelle, joten Kunden apu oli juuri sitä mitä tarvitsin :)

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

    Luetuimmat keskustelut

    1. 153
      3889
    2. Putin lähti takki auki sotaan....

      Luuli, että kolmessa päivässä hoidetaan, nyt on mennyt 3,5 vuotta eikä voitosta tietoakaan. Kaiken lisäksi putin luuli,
      Maailman menoa
      88
      3283
    3. SDP ylivoimainen ykkönen

      En ole koskaan viitsinyt käydä äänestämässä, mutta nyt SDP:n etumatka on niin kutkuttava, että pakkohan se on vaivautua.
      Maailman menoa
      86
      2678
    4. Polttomoottoriauto on köyhän merkki

      Kun ei ole varaa ostaa sähköautoa, niin joutuu köyhän autoa käyttämään.
      Maailman menoa
      268
      2466
    5. Patteriauton ovia ei saatu auki - kuljettaja koki hirvittävän kuoleman!

      ”Oviongelma johti kuskin kuolemaan kolarissa – tämä ratkaisu saatetaan kieltää kokonaan Sivulliset pyrkivät tempomaan a
      Maailman menoa
      39
      2256
    6. Näitä venäjä-faneja tuntuu edelleen vaan riittävän - kummallista

      ja lähinnä siis ihan suomalaisia. Mitä hienoa ja hyvää he näkevät maassa joka on diktatuuri, maassa jossa ei ole sananv
      Maailman menoa
      103
      1921
    7. Mies älä

      Odota enää vaan toimi. Pieni vinkkivitonen 🫰💥
      Ikävä
      42
      1009
    8. Harmittaa ettei paluuta entiseen enää ole

      Paluuta entiseen ei ole koska pilasit kaiken.
      Ikävä
      95
      988
    9. Mä tiedän

      Että sä tiedät, että mä tiedän, että sä tiedät. Me molemmat tiedetään. Onko näin?
      Ikävä
      53
      879
    10. Haapaveille jotain uutta!

      Huoltoasema Haapavein keskustaan tulossa. Semmoista Jeppasissa jaappasevat.
      Haapavesi
      16
      830
    Aihe