الدالة IPmt

ينطبق على
Access لـ Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

ترجع هذه الدالة Double الذي يحدد دفعة الفائدة لفترة من المرتب الدوري على أساس الدفعات الدورية الثابتة ومعدل الفائدة الثابت.

بناء الجملة

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

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

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

ملاحظات

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

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

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

مثال استعلام

التعبير النتائج
SELECT FinancialSample.*, IPMT([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، حدد "مرجع المطور" في القائمة المنسدلة بجوار "بحث" وأدخل مصطلح أو أكثر في مربع البحث.

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