Vba apua

apuuuva2

Mulla on K sarakkeessa määrä ja G sarakkeessa hinta. Haluaisin M sarakkeeseen tulon noista, eli K*G. Ongelma on se että joka rivillä ei ole tietoa, eli välissä on tyhjiä rivejä. Tein kaavan =JOS(K2=>0,01;K2*G2;"") joka tietenkin toimii mutta kun taulukossa on kymmeniä tuhaansia rivejä niin jos tuon saisi vba:na moduuliin niin että se laskisi joka rivin tiedot kun ehdot täyttyy niin helpottaisi kovasti.

1

103

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      Sub TäytäKaava()
      Dim vika As Integer
      vika = Range("K65536").End(xlUp).Row
      Range("M1").FormulaR1C1 = "=IF(RC[-2]>0,RC[-2]*RC[-6],"""")"
      Range("M1").AutoFill Destination:=Range("M1:M" & vika)
      End Sub

      Keep EXCELing
      @Kunde

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!

      Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t
      Kiuruvesi
      43
      13695

    2. V*ttuu että mä haluan sua

      Jos jotain ihmistä voi kunnolla haluta, niin hän on se. Voi Luoja auta jo! Joku jeesus hjelppa mej!
      Ikävä
      96
      4935

    3. Nolointa ikinä miehelle

      On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai
      Ikävä
      129
      4392

    4. Katsoitko mua yhtään

      Kun nähtiin 🥺.
      Ikävä
      61
      3822

    5. Eli jos toisen hiki haisee ns. omaan nenään siedettävältä

      Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳
      Ikävä
      61
      3530

    6. Mikä sinua eniten

      Huolestuttaa tässä tilanteessa?
      Ikävä
      120
      3445

    7. Koska olet viimeksi nähnyt ikävän kohteesi?

      Ja mitä tarjoat hänelle kun koputtaa oveesi?
      Ikävä
      53
      2447

    8. Sattuma ja muutama väärinkäsitys

      vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul
      Ikävä
      51
      2375

    9. Keskusta hajoaa Palojärvi lähtee

      Suomen Keskustan ryhmä hajoaa Kemijärvellä. Kalastaja Palojärvi sai tarpeekseen ja loikkasi Sitoutumattomat Aati Virkkul
      Kemijärvi
      32
      2150

    10. On sillä rääpyä

      Tuo ex kuntajohtaja Lea Tolonen kehtaakin tulla Ähtäriin. Ajoi laivan Karille. Kari Heikkilä oikaisi taloutta, sai laiva
      Ähtäri
      17
      1813
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt