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.
Kunde ja Rautalanka
3
78
Vastaukset
- 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.
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ä.
Luetuimmat keskustelut
- 1612831
Kun viimeksi kohtasitte/näitte
Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...1351996Olet kyllä vaarallisen himokas
Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.1091946- 841644
- 811521
Anna vielä vähän vihreää valoa
Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet241512- 2271110
- 681042
Miksi homous puhuttaa konservatiiveja vuodesta toiseen?
Kysymykseen on vastattukin Kansanlähetyksen osalta: "Miksi sukupuoleen ja seksuaalisuuteen liittyvät asiat ovat konserv2641040- 73930