SLN 函数 [VBA]

返回一个周期内资产的直线折旧额。整个折旧期间内的折旧总额是恒定的。

warning

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.


语法:


SLN (Cost as Double, Salvage as Double, Life as Double)

返回值:

Double

参数:

成本」是指资产的初始成本。

Salvage」是资产在折旧期限终止时的剩余价值。

Life」折旧期限确定资产折旧的周期数。

错误代码:

5 无效的过程调用

示例:


REM ***** BASIC *****
Option VBASupport 1
Sub ExampleSLN
REM 计算资产的年度折旧额,资产在第一年初成本为 $10,000,
REM 五年后的残余价值为 $1,000。
Dim y_dep As Double
y_dep = SLN( 10000, 1000, 6 )
print y_dep ' 返回 1500。
End Sub

请支持我们!