DDB 函数 [VBA]

返回指定期间内资产的折旧，使用算术递减方法。

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


DDB(Cost As Double, Salvage As Double, Life as Double, Period as Double, [Factor as Variant])

Double

「Cost」确定资产的初始成本。

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

「Life」定义资产使用的时间长度 (如年或月)。

「Period」表示计算该值的周期。

「Factor」 (可选) 是一个用于折旧计算的余额递减因子。若省略这个参数，程序便会采用默认设定，即 factor = 2。

如果需要较高的初始折旧值而非线性折旧，请使用此折旧形式。折旧价值随每个期间的价值而减少，通常用于购买后不久价值损失较高的资产 (例如车辆、计算机)。请注意，在此计算类型下，帐面值永远不会达到零。

5 无效的过程调用


Sub ExampleDDB
 Dim ddb_yr1 As Double
 ddb_yr1 = DDB(75000,1,60,12,2)
 Print ddb_yr1 ' 返回 1,721.81 货币单位。
End Sub