SYD 函数

返回一个 Double 值, 指定在指定期间内资产按年限总和折旧法计算的折旧值。

语法

SYD ( 成本、抢救、生命、期 )

SYD函数语法具有以下参数:

参数

描述

成本

必需。 指定资产的初始成本的double

废品

必需。 Double值, 指定资产在有用生命周期结束时的价值。

人生

必需。 指定资产的有效生命周期的长度的double

试用期

必需。 Double值, 指定计算资产折旧的时间段。

备注

Life period参数必须以相同的单位表示。 例如, 如果 " life " 按月给出, 则 "周期" 也必须以月为单位提供。 所有参数都必须是正数。

查询示例

表达式

结果

选择 SYD ([LoanAmount], [LoanAmount] *. 1, 20, 2) 作为来自 FinancialSample 的表达式 1;

计算资产价值为 "LoanAmount" 的折旧值, 残值为 10% ("LoanAmount" 乘以 0.1), 考虑资产的可用年限为20年。 折旧计算第二年。

选择 "SYD" ([LoanAmount], 0, 20, 3) 作为 FinancialSample 中的 SLDepreciation;

返回资产价值为 "LoanAmount" 的折旧值, 其残值为 $0, 即资源的可用年限为20年。 结果显示在列 SLDepreciation 中。 折旧计算第三年。

VBA 示例

注意: 下面的示例演示了在 Visual Basic for Applications (VBA) 模块中使用此函数的示例。 有关使用 VBA 的详细信息, 请在 "搜索" 旁边的下拉列表中选择 "开发人员引用", 然后在搜索框中输入一个或多个字词。

此示例使用SYD函数返回特定期间内资产的折旧值, 假设资产的初始成本 (InitCost)、资产的可用生命周期 (SalvageVal) 结束时的残值和资产总使用年限 (LifeTime)。 计算折旧的期间以年为 PDepr

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, PDepr
Const YEARMONTHS = 12 ' Number of months in a year.
Fmt = "###,##0.00" ' Define money format.
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("What's the asset's value at the end of its life?")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YEARMONTHS ' Ensure period is >= 1 year.
MsgBox "Asset life must be a year or more."
MonthLife = InputBox("What's the asset's useful life in months?")
Loop
LifeTime = MonthLife / YEARMONTHS ' Convert months to years.
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("For which year do you want depreciation?"))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = CInt(InputBox("For what year do you want depreciation?"))
Loop
PDepr = SYD(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & Format(PDepr, Fmt) & "."

注意:  本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×