지정된 기간 동안 자산의 수 감가 상각을 지정하는 Double을 반환합니다.
구문
SYD( 비용, 인양, 수명, 기간 )
SYD 함수 구문에는 다음과 같은 인수가 사용됩니다.
|
인수 |
설명 |
|
비용 |
필수 요소입니다. 자산의 초기 비용을 두 번 지정합니다. |
|
구조 |
필수 요소입니다. 유용한 수명이 끝날 때 자산의 값을 두 번 지정합니다. |
|
사용 시간 |
필수 요소입니다. 자산의 유용한 수명 길이를 이중으로 지정합니다. |
|
기간 |
필수 요소입니다. 자산 감가 상각이 계산되는 기간을 이중으로 지정합니다. |
주의
수명 및 기간 인수는 동일한 단위로 표현되어야 합니다. 예를 들어 수개월 안에 생명 이 주어지면 몇 달 안에 마침표 도 주어져야 합니다. 모든 인수는 양수여야 합니다.
쿼리 예제
|
Expression |
결과 |
|
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample; |
자산의 유용한 수명을 20년으로 고려하여 "LoanAmount"로 평가되는 자산의 감가 상각액을 10%("LoanAmount"에 0.1을 곱한 값)로 계산합니다. 감가 상각액은 2년 동안 계산됩니다. |
|
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; |
자산의 유용한 수명을 20년으로 고려하여 회수 값이 $0인 "LoanAmount"로 평가되는 자산의 감가 상각액을 반환합니다. 결과는 SLDepreciation 열에 표시됩니다. 감가 상각액은 3년 동안 계산됩니다. |
VBA 예제
참고: VBA(Visual Basic for Applications) 모듈에서 이 함수를 사용하는 경우를 예로 들어 보겠습니다. 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) & "."
