En osaa, vaan haluaisiko joku auttaa, joka osaa;)
Pitäisi tehdä lainanlasku makro, joka laskee talukkoon nappia painamalla lähtöarvoista lukien, kauanko kestää lainan maksu.
Taulukko voisi olla vaikka:
laina määrä 7500
laina-aika vuosissa 2
korko vuodessa 0,05
lyhennys/kk 312,5
laina-aika 24 kk
korko kuukaudessa 0,00417
Noita lähtöarvoja pitää voida muuttaa ja edelleen napin painallus laskee oikein?
Pulma on ja olen toki tehnyt monemoista viritelmä, mutta joku mättää aina.
Apu olisi todella tervetullut.
Kiitos jo etukäteen pahasta pulasta mahdollisesti minut päästäneelle auttajalle.
makro ja laina ja laskut - apuvaaa
katiko
3
359
Vastaukset
- katiko
Lukijoita kyllä näyttää riittävän, mutta kukaan ei halua auttaa, Mul on viritykset For Nextillä ja nyt testailin Do...Loop until ja käänsin sitten Do until....Loop, mutta tulos on ihan yhtä hutera. Jotenkin kun olen kolmatta päivää vääntänyt tuota taulukkoa, jotta rivitasolla nappia painamalla tulisi tulos, milloin laina on maksettu, niin joko mun viritys laskee vain yhden rivin tai sitten on virheilmoitusta tiedossa. että löytyisikä sitä apua, edes vihje mielessä, jotta pääsisin eteenpäin. PLIIIS ja tiedoksi auttajille, jotta oon jo viiskymppinen nuori nainen, joka yrittää selvitä visaisesta tehtävästä ja oppia edes hitusen esimerkkien avulla excelin VBA:ta.
- pohjaksi
En tiedä mitä tuossa pitäisi sitten makrolla tehdä, kun Excelin omat funktiot osaisivat tehdä tuon helposti. Englanninkielisessä excelissä on funktio pmt, jolla saa erän suuruuden selville.
Jos jotakin kuitenkin pohjaksi, niin lisäile Exceliin Forms -työkalurivillä nappi ja Sheet / Thisworkbook -osioon (tai modulekin käy), seuraavantapainen toiminto:
Sub Button1_Click()
Dim lan As Double, tid As Double, ranta As Double, rantesats As Double
lan = ActiveSheet.Cells(2, 2).Value 'lån
tid = ActiveSheet.Cells(6, 2).Value 'tid(månader)
ranta = ActiveSheet.Cells(6, 2).Value 'ränta
rantesats = f(lan, tid, ranta)
ActiveSheet.Cells(6, 2).Value = rantesats 'räntesats (resultat)
End Sub
Olen jättänyt tuosta korkoerän laskennan pois, kun en äkkiseltään saanut 312,5:lta kuukausieräksi. - vb2005
Se 312,5 on ilman korkoa, mutta kun koron ottaa huomioon, tulee eräksi riippuen laskentatavasta jotakin muuta.
Funktiona voisi käytellä vb:ssä olevaa Pmt tai PPMt:tä (toiminta vastaava kuin laskentataulukon puolella).
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa
En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod225234- 254398
- 282541
- 342264
- 372008
- 151928
En ole koskaan kokenut
Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka191617- 121541
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons211277Kerranki asiat oikein
Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa101194