Microsoft Office Online
Registruotis į „Mano Office Online (Kas tai?)“ | Registruotis

 
 
Microsoft Office Access
Ieška
Ieška
 
Patikrinkite, gal atsirado naujinimų. (c) Microsoft
„Office“ failai – atsisiųsti
 
 
 
Įspėjimas: Jūs mėginate peržiūrėti šį puslapį su nepalaikoma naršyklės versija. Šis puslapis geriausiai veikia su „Microsoft Internet Explorer 6.0“ ar vėlesne versija, „Firefox 1.5“ arba „Netscape Navigator 8.0“ ar vėlesne versija. Sužinokite apie palaikomas naršykles daugiau.

Funkcija NPer
 

Grąžina Dvigubąjį (duomenų tipas Double: pagrindinis duomenų tipas, skirtas laikyti dvigubojo tikslumo slankiojo kablelio skaičius. Įsimenamas kaip 64 bitų dvejetainis skaičius, kurio reikšmės kinta nuo apytiksliai -1,797E308 iki -4,940E-324 (neigiamos), nuo 4,94E-324 iki 1,797E308 (teigiamos) ir 0.), nurodantį anuiteto, paremto periodiniais, fiksuotais mokėjimais ir fiksuota palūkanų norma, periodų skaičių.

Sintaksė

NPer(norma, mok, dv [, bv ] [, tipas ] )

Funkcijos NPer sintaksės argumentai (argumentas: reikšmė, teikianti informaciją veiksmui, įvykiui, metodui, ypatybei, funkcijai arba procedūrai.):

Argumentas Aprašas
norma Būtinas. Dvigubasis, nurodantis laikotarpio palūkanų normą. Pavyzdžiui, jeigu gaunate paskolą automobiliui su 10 procentų metinėmis palūkanomis (APR) ir mokate mėnesines įmokas, laikotarpio norma yra 0,1/12 arba 0,0083.
mok Būtinas. Dvigubasis, nurodantis kiekvieno laikotarpio įmoką. Paprastai anuiteto įmokų kapitalas ir palūkanos nesikeičia.
dv Būtinas. Dvigubasis, nurodantis dabartinę arba šiandienos būsimų mokėjimų ar įplaukų reikšmę. Pavyzdžiui, kai pasiskolinate pinigų automobiliui pirkti, paskolos dydis yra dabartinė jūsų būsimų mėnesinių mokėjimų už automobilį vertė skolintojui.
bv Pasirinktinis. Variantas (duomenų tipas Variant: Numatytasis duomenų tipas tipo aprašo simbolių neturintiems kintamiesiems, kai negaliojaDeftipo sakinys. Variant tipas gali įsiminti skaitinius, eilutės, duomenų/laiko, Null arba Empty tipo duomenis.), nurodantis būsimąją vertę arba jūsų norimų turėti grynųjų pinigų kiekį atlikus paskutinį mokėjimą. Pavyzdžiui, būsimoji paskolos vertė yra 0 Lt, nes tai yra jos vertė po paskutinio mokėjimo. Tačiau, jeigu savo vaiko išsilavinimui per 18 metų norite sutaupyti 50 000 Lt, tada 50 000 Lt yra būsimoji vertė. Jeigu nenurodyta, laikoma, jog vertė lygi 0.
tipas Pasirinktinis. Variantas, nurodantis, iki kada reikia apmokėti. Naudokite 0, jei reikia apmokėti iki laikotarpio pabaigos, arba 1, jei reikia apmokėti iki laikotarpio pradžios. Jeigu nenurodyta, laikoma, jog reikšmė yra 0.

Pastabos

Anuitetas – tai fiksuotų mokėjimų per tam tikrą laikotarpį seka. Anuitetas gali būti paskola (pavyzdžiui, nekilnojamojo turto) ar investicija (pavyzdžiui, mėnesio santaupų planas).

Visiems argumentams (argumentas: reikšmė, teikianti informaciją veiksmui, įvykiui, metodui, ypatybei, funkcijai arba procedūrai.) išmokėti pinigai (pavyzdžiui, indėliai į santaupas) nurodomi neigiamais skaičiais; gauti pinigai (pavyzdžiui, dividendų čekiai) nurodomi teigiamais skaičiais.

Pavyzdys

 Pastaba   Toliau pateikiamuose pavyzdžiuose rodoma, kaip naudojama ši funkcija „Visual Basic for Applications“ (VBA) modulyje. Plačiau apie darbą su VBA žiūrėkite pasirinkę Nurodymai programuotojui išplečiamajame meniu šalia komandos Ieškoti ir įvedę į paieškos lauką vieną ar daugiau sąvokų.

Šiame pavyzdyje funkcija NPer naudojama grąžinti laikotarpių skaičių, per kuriuos reikia atlikti mokėjimus paskolos, nurodytos PVal, grąžinimui. Taip pat nurodyta laikotarpio palūkanų procentų norma (APR / 12), mokėjimas (Payment), būsimoji paskolos vertė (FVal) ir skaičius, nurodantis, ar mokėjimą reikia atlikti iki mokėjimo periodo pradžios ar pabaigos (PayType).

Dim FVal, PVal, APR, Payment, PayType, TotPmts

' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1

FVal = 0    ' Usually 0 for a loan.
PVal = InputBox("How much do you want to borrow?")
APR = InputBox("What is the annual percentage " & _
      "rate of your loan?")
If APR > 1 Then APR = APR / 100 ' Ensure proper form.
Payment = InputBox("How much do you " & _
          "want to pay each month?")
PayType = MsgBox("Do you make payments " & _
          "at the end of month?", vbYesNo)

If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If

TotPmts = NPer(APR / 12, -Payment, PVal, FVal, PayType)

If Int(TotPmts) <> TotPmts Then 
    TotPmts = Int(TotPmts) + 1
End If

MsgBox "It will take you " & TotPmts & _
" months to pay off your loan."