構文
Rate(nper,pmt,pv[,fv[,type[,guess]]])
引数nperには、支払い回数の合計を示す整数型の数値を指定します。
引数pmtには、毎回の支払額を示す倍精度浮動小数点数型の数値を指定します。
引数pvには、現在の貯蓄総額、または将来支払うべき金額の総額を指定します。
引数fvは省略可能です。投資の将来価値、または最後の支払いを行った後に残る現金の収支を指定します。
引数typeは省略可能です。支払期日を示すバリアント型の数値を指定します。
引数guessは省略可能です。利率の推定値を示すバリアント型の数値を指定します。
解説
投資期間を通じての利率を返します。
引数nperに指定する支払い回数は、支払期間全体の支払い数回数です。たとえば、4年間毎月支払う場合は、48回(4×12)を指定します。
引数pmtには、毎回支払う金額を指定します。毎回支払う金額には元金と利息が含まれます。支払金額が出金になる場合は、引数pmtにマイナスを指定します。
引数pvには、現在の貯蓄総額、または将来支払うべき金額の総額を指定します。
引数fvは省略可能です。投資の将来価値、または最後の支払いを行った後に残る現金の収支を指定します。
各期の期末に支払う場合は、引数typeに0を指定します。支払いが各期の期首に行われる場合は、引数typeに1を指定します。引数typeが省略されると、0を指定したものとみなされます。
引数guessを省略した場合には、0.1が指定されたものとみなします。
サンプル
Sub Sample() Dim pmt As Double, nper As Integer, pv As Double pmt = 50000 nper = 60 pv = -1000000 MsgBox Rate(nper, pmt, pv) End Sub