SLN


構文

SLN(cost,salvage,life)

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

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

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

解説

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

サンプル

次の例は、取得価額600,000、残存価額10%、耐用年数5年の場合、定額法の減価償却費を表示します。

Sub Sample()
    Dim Cost As Long, Life As Integer
    Cost = 600000
    Life = 5
    MsgBox SLN(Cost, Cost * 0.1, Life)   '108000を表示します
End Sub