Funkcja SYD

Zwraca liczbę podwójnej precyzji określającą amortyzację środka trwałego za dany okres metodą sumy cyfr lat amortyzacji.

Składnia

SYD(koszt, odzysk, czas_życia, okres)

W składni funkcji SYD występują następujące argumenty:

Argumenty argumentów	Opis
Koszt	Argument wymagany. Liczba podwójnej precyzji określająca początkowy koszt środka trwałego.
Odzysk	Argument wymagany. Liczba podwójnej wartości środka trwałego na koniec okresu użytkowania.
czas pracy	Argument wymagany. Liczba podwójna określająca długość okresu użytkowania środka trwałego.
kropka	Argument wymagany. Liczba podwójnej precyzji określająca okres, dla którego jest obliczana amortyzacja środka trwałego.

Uwagi

Argumenty czasu życia i okresu muszą być wyrażone w tych samych jednostkach. Na przykład, jeśli życie jest podane w miesiącach, okres musi być również podany w miesiącach. Wszystkie argumenty muszą być liczbami dodatnimi.

Przykłady kwerend

Wyrażenie	Rezultat
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample;	Oblicza amortyzację środka trwałego o wartości "Kwota pożyczki" o wartości odzyskanej równej 10% ("Kwota pożyczki" pomnożona przez 0,1), przyjmując, że okres użytkowania środka trwałego wynosi 20 lat. Amortyzacja jest obliczana dla drugiego roku.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample;	Zwraca amortyzację środka trwałego o wartości "KwotaPożyczki" o wartości odzyskanej 0 zł, przy założeniu, że okres użytkowania środka trwałego wynosi 20 lat. Wyniki są wyświetlane w kolumnie SLDepreciation. Amortyzacja jest obliczana dla trzeciego roku.

Przykład kodu VBA

W tym przykładzie zastosowano funkcję SYD w celu zwrócenia amortyzacji środka trwałego w danym okresie, biorąc pod uwagę początkowy koszt środka trwałego (InitCost), wartość odzyskaną na koniec okresu użytkowania środka trwałego (SalvageVal) oraz całkowity okres użytkowania środka trwałego w latach (LifeTime). Okres w latach, dla którego obliczana jest amortyzacja, jest PDeprrówny .

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) & "."