Fungsi PPmt

Penting: Artikel ini adalah terjemahan mesin, lihat penafian. Temukan versi bahasa Inggris artikel di sini sebagai rujukan Anda.

Mengembalikan ganda menentukan pembayaran pokok untuk periode tertentu anuitas berdasarkan pembayaran berkala, tetap dan tingkat 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 sampai nper.

nper

Diperlukan. Bilangan bulat menentukan jumlah periode pembayaran di anuitas. Misalnya, jika Anda membuat pembayaran bulanan pinjaman mobil empat tahun, pinjaman Anda memiliki total periode pembayaran 4 * 12 (atau 48).

PV

Diperlukan. Menentukan ganda nilai, atau nilai saat ini, dari serangkaian pembayaran atau tanda terima. Misalnya, saat Anda meminjam uang untuk membeli mobil, jumlah pinjaman adalah nilai saat ini untuk pinjaman mobil pembayaran bulanan Anda akan membuat.

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

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 utama ketika semua pembayaran nilai yang sama. Diberikan adalah persentase suku bunga tiap periode (APR / 12), periode pembayaran yang bagian utama yang diinginkan (Period), jumlah pembayaran (TotPmts), nilai saat ini atau pokok pinjaman (PVal), nilai masa depan pinjaman (FVal), dan angka yang menunjukkan apakah pembayaran jatuh tempo di 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

Catatan: Penafian Terjemahan Mesin: Artikel ini telah diterjemahan oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan terjemahan mesin ini untuk membantu pengguna yang bukan penutur bahasa Inggris agar dapat menikmati konten tentang produk, layanan, dan teknologi Microsoft. Karena artikel ini diterjemahkan oleh mesin, mungkin akan terdapat kesalahan kosa kata, sintaksis, atau tata bahasa.

Kembangkan keterampilan Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×