SYD


構文

SLN(cost,salvage,life,period)

引数costには、資産の購入価額を指定します。

引数salvageには、減価償却終了後の残存価額を指定します。

引数lifeには、耐用年数を指定します。

引数periodには、減価償却を計算する期を指定します。

解説

定額逓減法による減価償却費を返します。

引数lifeと引数periodには同じ単位を指定します。たとえば減価償却費を求める期間(period)に月を指定した場合、耐用年数(life)も月数で指定します。

サンプル

次の例は、取得価額600,000、残存価額10%、耐用年数5年、初年度の定額逓減法で計算した減価償却費を表示します。

Sub Sample()
    Dim cost As Long, life As Integer, period As Integer
    cost = 600000
    life = 5
    period = 1
    MsgBox SYD(cost, cost * 0.1, life, period) '180000を表示します
End Sub