Fungsi IPmt

Mengembalikan Ganda yang menentukan pembayaran bunga untuk periode anuitas tertentu berdasarkan pembayaran berkala, pembayaran tetap, dan suku bunga tetap.

Sintaks

IPmt (rate, per, nper, pv [, fv ] [, tipe ] )

Sintaks fungsi IPmt memiliki argumen berikut:

Argumen	Deskripsi
Nilai	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. Menentukan periode pembayaran ganda dalam rentang 1 hingga nper.
NPER	Diperlukan. Tentukan dua kali 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. Menentukan dua kali 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 dari 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 tarif dan nper harus dihitung menggunakan periode pembayaran yang dinyatakan dalam unit yang sama. Misalnya, jika tarif 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
PILIH FinancialSample.*, IPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) SEBAGAI INTPaid DARI FinancialSample;	Mengembalikan semua bidang dari tabel "FinancialSample", menghitung Bunga yang dibayarkan dalam "per"(10 dalam contoh ini) dari "LoanAmount" berdasarkan "AnnualRate" dan "TermInYears" dan menampilkan hasilnya di kolom INTPaid.

Contoh VBA

Contoh ini menggunakan fungsi IPmt untuk menghitung berapa banyak pembayaran yang merupakan bunga ketika semua pembayaran memiliki nilai yang sama. Diberikan adalah tingkat persentase bunga per periode (APR / 12), jangka waktu pembayaran yang diinginkan porsi bunga (Period), jumlah total pembayaran (TotPmts), nilai sekarang 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 FVal, Fmt, PVal, APR, TotPmts, PayType
Dim Period, IntPmt, TotInt, Msg
Const ENDPERIOD = 0, BEGINPERIOD = 1
FVal = 0    ' Usually 0 for a loan.
Fmt = "###,###,##0.00"    ' Define money format.
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?")
PayType = MsgBox("Do you make payments at " & _
    "the end of the month?", vbYesNo)
If PayType = vbNo Then 
     PayType = BEGINPERIOD 
     Else PayType = ENDPERIOD
End If
For Period = 1 To TotPmts    ' Total all interest.
    IntPmt = IPmt(APR / 12, Period, TotPmts, _
             -PVal, FVal, PayType)
    TotInt = TotInt + IntPmt
Next Period
Msg = "You'll pay a total of " & Format(TotInt, Fmt) 
Msg = Msg & " in interest for this loan."
MsgBox Msg    ' Display results.