الدالة PPmt

إرجاع "مزدوج" يحدد الدفعة الرئيسية لفترة معينة من المرتب الدوري استنادا إلى الدفعات الدورية الثابتة ومعدل فائدة ثابت.

بناء الجملة

PPmt ( rate, per, nper , pv [, fv ] [, type ] )

يحتوي بناء جملة الدالة PPmt على هذه الوسيطات:

الوسيطة	الوصف
*rate*	مطلوبة. تحديد مزدوج لمعدل الفائدة لكل فترة زمنية. على سبيل المثال، إذا حصلت على قرض سيارة بمعدل نسبة مئوية سنوية (APR) بنسبة 10 بالمائة وقمت بسداد دفعات شهرية، فإن المعدل لكل فترة هو 0.1/12، أو 0.0083.
في	مطلوبة. عدد صحيح يحدد فترة الدفع في النطاق من 1 إلى *nper*.
*Nper*	مطلوبة. عدد صحيح يحدد العدد الإجمالي لفترات الدفع في المرتب السنوي. على سبيل المثال، إذا قمت بإجراء دفعات شهرية على قرض سيارة لمدة أربع سنوات، فإن القرض الخاص بك له إجمالي 4 * 12 (أو 48) فترة دفع.
*الكهروضوئيه*	مطلوبة. تحديد مزدوج للقيمة الحالية، أو القيمة الحالية، لسلسلة من المدفوعات أو الإيصالات المستقبلية. على سبيل المثال، عندما تقترض أموالا لشراء سيارة، فإن مبلغ القرض هو القيمة الحالية للمقرض لدفعات السيارة الشهرية التي ستقوم بها.
Fv	اختيارية. متغير يحدد القيمة المستقبلية أو الرصيد النقدي الذي تريده بعد إجراء الدفعة النهائية. على سبيل المثال، القيمة المستقبلية للقرض هي 0 دولار لأن هذه هي قيمته بعد الدفعة النهائية. ومع ذلك، إذا كنت تريد توفير 50,000 دولار على مدى 18 عاما لتعليم طفلك، فإن 50,000 دولار هي القيمة المستقبلية. إذا تم حذفه، فسيتم افتراض 0.
*type*	اختيارية. متغير يحدد وقت استحقاق المدفوعات. استخدم 0 إذا كانت المدفوعات مستحقة في نهاية فترة الدفع، أو استخدم 1 إذا كانت المدفوعات مستحقة في بداية الفترة. إذا تم حذفه، فسيتم افتراض 0.

ملاحظات

المرتب السنوي هو سلسلة من المدفوعات النقدية الثابتة التي تم إجراؤها على مدى فترة زمنية. يمكن أن يكون المرتب السنوي قرضا (مثل الرهن العقاري) أو استثمارا (مثل خطة الادخار الشهرية).

يجب حساب وسيطات المعدلوnper باستخدام فترات الدفع المعبر عنها بنفس الوحدات. على سبيل المثال، إذا تم حساب السعر باستخدام الأشهر، فيجب أيضا حساب nper باستخدام الأشهر.

وبالنسبة لجميع الحجج، يتم تمثيل النقدية المدفوعة (مثل الودائع في المدخرات) بأرقام سالبة؛ يتم تمثيل النقدية المستلمة (مثل شيكات الأرباح) بأرقام موجبة.

مثال على الاستعلام

تعبير	النتائج
SELECT FinancialSample., PPMT([AnnualRate]/12,10,[TermInYears]12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;	إرجاع كافة الحقول من الجدول "FinancialSample"، وحساب المبلغ الأساسي المدفوع في "per" (10 في هذا المثال)من "LoanAmount" استنادا إلى "AnnualRate" و"TermInYears" ويعرض النتائج في العمود INTPaid.

مثال VBA

ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، حدد مرجع المطور في القائمة المنسدلة بجوار البحث وأدخل مصطلحا واحدا أو أكثر في مربع البحث.

يستخدم هذا المثال الدالة PPmt لحساب مقدار الدفع لفترة محددة هو أساس عندما تكون جميع المدفوعات متساوية القيمة. يتم إعطاء معدل نسبة الفائدة لكل فترة (APR / 12)، وفترة الدفع المطلوبة للجزء الرئيسي (Period)، وإجمالي عدد المدفوعات (TotPmts)، والقيمة الحالية أو أصل القرض (PVal)، والقيمة المستقبلية للقرض (FVal)، ورقم يشير إلى ما إذا كان الدفع مستحقا في بداية فترة الدفع أو نهايتها (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

مثال على الاستعلام

مثال VBA

هل تحتاج إلى مزيد من المساعدة؟

الخروج من الخيارات إضافية؟

هل كانت المعلومات مفيدة؟

نشكرك على ملاحظاتك!