Kunde ja Rautalanka

Kiitoks

Moi,

Näyttäisikö tällaisen toimivan Macron, mikä lukee talukon läpi:

Jos nimitän A,B,C,D vaikkapa sarakkeiksi.
A sarake sisältää kolmepitkiä numeerisia lukua (233, 772, 124, jne)
ja
B sarake sisältää myös kolmepitkiä numeerisia lukua (233, 772, 124, jne)

C sarakkeeseen tulostetaan aina A ja B rivien summa yhteensä.
Jos A B rivin summa on isompi kuin 1001, tulostetaan D sarakkeeseen se summa ja messutaan ruudulle ”Luku ylittyi ” ylittynyt summa.

3

87

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ylittäjä

      Ihan "kotikonstein".
      Kirjoita jonnekkin soluun "Luku ylittyi" (esimerkissä G1:seen)
      D1=JOS(C1

      • ดอกเบี้ย

        Juu kiitos. Yritin saada apua Macron tekoon samalla, vähän niinkuin alkeista lähtien, samalla oikeaa asiaa mukaillen.

        Joten odotan jospa Kunde valmiin koodinsa kanssa avustaisi.

    • kunde

      Option Explicit
      Sub HarjoitusMakro()
      'määitellään rivimuuttuja, parempi käyttää long muotoa kun muuttaa kuitenkin integer --->long
      Dim vika As Long
      'vika rivi sarakkeesta A
      vika = Range("A65536").End(xlUp).Row
      'kaava soluun C1 =A1 B1
      Range("C1").FormulaR1C1 = "=RC[-2] RC[-1]"
      'käytetään automaattitäyttöä... vastaa raahaamista fiksumpi tapa kuin loopata ;-)
      Range("C1").AutoFill Destination:=Range("C1:C" & vika), Type:=xlFillDefault
      'samat jutut D sarakkeeseen...
      Range("D1").FormulaR1C1 = "=IF(RC[-3] RC[-2]

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Kalle Palander kertoi fantasioivansa siitä, kuinka Kiira Korpi naisi häntä sträppärillä ahteriin

      Sai potkut Yleltä. https://yle.fi/a/74-20140000
      Maailman menoa
      617
      10651

    2. 24h Kirppis

      Olen muuttamassa paikkakunnalle ja mietin olisiko tälläiselle liikkeelle tarvetta alueella?
      Jämsä
      10
      3319

    3. Suomessa eletään liian pitkään

      "Ihmisten on kuoltava" Asiantuntija varoittaa: Suomi ei ole valmis siihen, että niin moni elää pitkään: ”Kaiken täytyy
      Maailman menoa
      228
      2230

    4. Kerotakaa joensuun kontiolahden paiholan laitoksesta jotain

      Mun kaveri joutuu paiholan laitokseen nyt lähi aikoina niin voisko ihmiset kertoa minkälaista siellä on tarinoita jne ja
      Joensuu
      23
      2043

    5. Deodoranttiteollisuus

      Annan ilmaisen vinkin. Kyseinen teollisuus voisi alkaa valmistaa kuolleen ruumiin hajua. Olisi varma hittituote, ainakin
      Jämsä
      2
      1442

    6. Sun ulkonäkö on

      Kyllä viehättävä. Kauniit piirteet. Todella sievät. Ja olemus on ihana. Olet tehnyt vaikutuksen.
      Ikävä
      49
      1154

    7. Näyttääkö kaivattusi

      Miten hyvältä ❤️
      Ikävä
      72
      1140

    8. Trump syyttää Bideniä ja Obamaa lentoonnettomuudesta!

      Ukko on ihan seonnut.
      Maailman menoa
      176
      1034

    9. Olen niin haaveillut

      Sinusta. Ollut hullun rakastunut. Ajatellut kaikkea mitä yhdessä voisimme tehdä. Mutta ei ei yhtään mitään. Usko vaan lo
      Ikävä
      59
      999

    10. Oletko koskaan

      Tavannut/tuntenut ihmistä, jonka kanssa vuosisadan rakkaustarina olisi ollut mahdollinen, mutta joku este tuli väliin?
      Sinkut
      77
      959
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt