會傳回一個 Double, 指定資產在單一期間內的直線折舊。
語法
SLN ( 成本、搶救、生命 )
SLN函數具有下列引數:
引數 | 描述 |
---|---|
成本 |
必要。 指定資產的初始成本的double 。 |
salvage |
必要。 在實用的使用年限結束時, 指定資產的值。 |
實戰 |
必要。 指定資產使用年限長度的double 。 |
註解
折舊期間必須以與生命引數相同的單位來表示。 所有引數都必須是正數。
查詢範例
運算式 | 結果 |
---|---|
選取 SLN ([LoanAmount], [LoanAmount] *. 1, 20) 作為從 FinancialSample 的運算式1。 |
傳回資產價值為 "LoanAmount" 的折舊, 殘值為 10% ("LoanAmount" 乘以 0.1), 並考慮資產的使用年限為20年。 |
選取 [SLN] ([LoanAmount], 0, 20) 作為 SLDepreciation 從 FinancialSample; |
傳回資產價值為 "LoanAmount" 的折舊, 殘值為 $0, 考慮資產的使用年限為20年。 結果會顯示在 [欄 SLDepreciation] 中。 |
VBA 範例
附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。
這個範例使用SLN函數, 在已知資產的初始成本 (InitCost)、資產的使用年限 (SalvageVal) 結尾的殘值, 以及資產總使用年限 (LifeTime) 後, 傳回固定資產的直線折舊。
Dim Fmt, InitCost, SalvageVal
Dim MonthLife, LifeTime, 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 useful life?")
MonthLife = InputBox("What's the asset's useful " & _
"life in months?")
' Ensure period is >= 1 year.
Do While MonthLife < YEARMONTHS
MsgBox "Asset life must be a year or more."
MonthLife = InputBox("What's the asset's " & _
"useful life in months?")
Loop
' Convert months to years.
LifeTime = MonthLife / YEARMONTHS
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
' Round up to nearest year.
LifeTime = Int(LifeTime + 1)
End If
PDepr = SLN(InitCost, SalvageVal, LifeTime)
MsgBox "The depreciation is " & _
Format(PDepr, Fmt) & " per year."
附註: 本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。 讓這些內容對您有所幫助是我們的目的。 告訴我們這項資訊是否有幫助? 這裡是供您參考的英文文章。