Mengembalikan Double yang menentukan pembayaran pokok untuk periode anuitas tertentu berdasarkan pembayaran berkala dan tetap dan suku bunga tetap.
Sintaks
PPmt ( rate, per, nper , pv [, fv ] [, type ] )
Sintaks fungsi PPmt memiliki argumen ini:
|
Argumen |
Deskripsi |
|
rate |
Diperlukan. Ganda menentukan suku bunga per periode. Misalnya, jika Anda mengambil kredit mobil dengan persentase suku bunga tahunan (APR, Annual Percentage Rate) 10 persen dan melakukan pembayaran bulanan, suku bunga per periode adalah 0,1/12, atau 0,0083. |
|
Per |
Diperlukan. Bilangan bulat yang menentukan periode pembayaran dalam rentang 1 hingga nper. |
|
nper |
Diperlukan. Bilangan bulat yang menentukan jumlah total periode pembayaran dalam anuitas. Misalnya, jika Anda melakukan pembayaran bulanan pada kredit mobil selama empat tahun, pinjaman Anda mempunyai total dari 4 * 12 (atau 48) periode pembayaran. |
|
Pv |
Diperlukan. Ganda menentukan nilai saat ini, atau nilai hari ini, dari serangkaian pembayaran atau tanda terima di masa mendatang. Misalnya, ketika Anda meminjam uang untuk membeli mobil, jumlah pinjaman adalah nilai saat ini kepada pemberi pinjaman pembayaran mobil bulanan yang akan Anda lakukan. |
|
fv |
Opsional. Varian menentukan nilai masa depan atau saldo yang Anda inginkan setelah melakukan pembayaran final. Misalnya, nilai masa depan pinjaman adalah $0 karena itulah nilai setelah pembayaran final. Namun, jika Anda ingin menabung $50.000 selama 18 tahun untuk pendidikan anak Anda, maka $50.000 adalah nilai masa depan. Jika dihilangkan, asumsinya 0. |
|
tipe |
Opsional. Varian menentukan kapan pembayaran jatuh tempo. Gunakan 0 jika pembayaran jatuh tempo di akhir periode pembayaran, atau gunakan 1 jika pembayaran jatuh tempo di awal periode. Jika dihilangkan, asumsinya 0. |
Keterangan
Anuitas adalah serangkaian pembayaran kas tetap yang dilakukan selama suatu periode waktu.. Anuitas bisa berupa pinjaman (seperti hipotek rumah) atau investasi (seperti rencana tabungan bulanan).
Argumen rate dan nper harus dihitung menggunakan periode pembayaran yang dinyatakan dalam satuan yang sama. Misalnya, jika rate dihitung menggunakan bulan, nper juga harus dihitung menggunakan bulan.
Untuk semua argumen, kas yang Anda bayarkan (seperti deposit hingga tabungan) dinyatakan dengan angka negatif; kas yang diterima (seperti cek dividen) dinyatakan dengan angka positif.
Contoh kueri
|
Ekspresi |
Hasil |
|
SELECT FinancialSample.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; |
Mengembalikan semua bidang dari tabel "FinancialSample", menghitung jumlah Pokok yang dibayarkan dalam "per"(10 dalam contoh ini)dari "LoanAmount" berdasarkan "AnnualRate" dan "TermInYears" dan menampilkan hasil dalam kolom INTPaid. |
Contoh VBA
Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi PPmt untuk menghitung berapa banyak pembayaran untuk periode tertentu adalah pokok ketika semua pembayaran memiliki nilai yang sama. Mengingat tingkat persentase bunga per periode (APR / 12), periode pembayaran yang diinginkan oleh porsi pokok (Period), jumlah total pembayaran (TotPmts), nilai saat ini atau pokok pinjaman (PVal), nilai pinjaman di masa mendatang (FVal), dan angka yang menunjukkan apakah pembayaran jatuh tempo pada awal atau akhir periode pembayaran (PayType).
Dim NL, TB, Fmt, FVal, PVal, APR, TotPmts, PayType, Payment, Msg, MakeChart, Period, P, I
Const ENDPERIOD = 0, BEGINPERIOD = 1 ' When payments are made.
NL = Chr(13) & Chr(10) ' Define newline.
TB = Chr(9) ' Define tab.
Fmt = "###,###,##0.00" ' Define money format.
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.
TotPmts = InputBox("How many monthly payments do you have to make?")
PayType = MsgBox("Do you make payments at the end of month?", vbYesNo)
If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD
Payment = Abs(-Pmt(APR / 12, TotPmts, PVal, FVal, PayType))
Msg = "Your monthly payment is " & Format(Payment, Fmt) & ". "
Msg = Msg & "Would you like a breakdown of your principal and "
Msg = Msg & "interest per period?"
MakeChart = MsgBox(Msg, vbYesNo) ' See if chart is desired.
If MakeChart <> vbNo Then
If TotPmts > 12 Then MsgBox "Only first year will be shown."
Msg = "Month Payment Principal Interest" & NL
For Period = 1 To TotPmts
If Period > 12 Then Exit For ' Show only first 12.
P = PPmt(APR / 12, Period, TotPmts, -PVal, FVal, PayType)
P = (Int((P + .005) * 100) / 100) ' Round principal.
I = Payment - P
I = (Int((I + .005) * 100) / 100) ' Round interest.
Msg = Msg & Period & TB & Format(Payment, Fmt)
Msg = Msg & TB & Format(P, Fmt) & TB & Format(I, Fmt) & NL
Next Period
MsgBox Msg ' Display amortization table.
End If
