SLN 함수

단일 기간 동안 자산의 직선 감가 상각을 지정하는 Double을 반환합니다.

구문

SLN(비용, 인양, 수명)

SLN 함수에는 다음과 같은 인수가 있습니다.

인수	설명
비용	필수 요소입니다. 자산의 초기 비용을 두 번 지정합니다.
구조	필수 요소입니다. 유용한 수명이 끝날 때 자산의 값을 두 번 지정합니다.
생활	필수 요소입니다. 자산의 유용한 수명 길이를 이중으로 지정합니다.

주의

감가 상각 기간은 life인수와 동일한 단위로 표현되어야 합니다. 모든 인수는 양수여야 합니다.

쿼리 예제

Expression	결과
SELECT SLN([LoanAmount],[LoanAmount]*.1,20) AS Expr1 FROM FinancialSample;	자산의 유용한 수명을 20년으로 고려하여 회수 값이 10%("LoanAmount"에 0.1을 곱한 "LoanAmount")로 평가되는 자산의 감가 상각액을 반환합니다.
SELECT SLN([LoanAmount],0,20) AS SLDepreciation FROM FinancialSample;	자산의 유용한 수명을 20년으로 고려하여 회수 값이 $0인 "LoanAmount"로 평가되는 자산의 감가 상각액을 반환합니다. 결과는 SLDepreciation 열에 표시됩니다.

VBA 예제

이 예제에서는 SLN 함수를 사용하여 자산의 초기 비용(), 자산의 유용 수명 종료 시 회수 값() 및 자산의 총 수명(InitCostSalvageVal)을 감안할 때 단일 기간 동안 자산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."