Funkce SYD

Vrátí hodnotu Double určující degresivní odpisy aktiva pro zadané období.

Syntaxe

ODPIS.NELIN(náklady, zůstatek, životnost, období)

Syntaxe funkce ODPIS.NELIN obsahuje tyto argumenty:

Argument	Popis
Náklady	Povinný argument. Dvojitá hodnota určující pořizovací cenu aktiva.
Záchrana	Povinný argument. Dvojitá specifikace hodnoty aktiva na konci jeho životnosti.
ŽIVOT	Povinný argument. Double určující délku životnosti aktiva.
tečka	Povinný argument. Dvojitá specifikace období, pro které se počítá odpisování aktiva.

Poznámky

Argumenty doby a životnosti musí být vyjádřeny ve stejných jednotkách. Je-li například život uveden v měsících, musí být doba uvedena také v měsících. Všechny argumenty musí být kladná čísla.

Příklady dotazů

Výraz	Výsledky:
SELECT SYD([ČástkaPůjčky],[ČástkaPůjčky]*.1,20,2) AS Výraz1 FROM FinancialSample;	Vypočítá odpis aktiva oceněného jako "ČástkaPůjčky" s zůstatkovou hodnotou 10 % (ČástkaPůjčky vynásobená 0,1), přičemž životnost aktiva je 20 let. Odpis se počítá pro druhý rok.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample;	Vrátí odpis aktiva s hodnotou "Částkapůjčky" s zůstatkovou hodnotou 0 Kč s uvažovanou životností aktiva 20 let. Výsledky jsou zobrazeny ve sloupci SLDepreciation. Odpis se počítá pro třetí rok.

Příklad jazyka VBA

V tomto příkladu funkce ODPIS.NELIN vrátí odpis aktiva za určité období s ohledem na pořizovací cenu aktiva (InitCost), zůstatkovou hodnotu na konci doby použitelnosti aktiva (SalvageVal) a celkovou životnost aktiva v letech (LifeTime). Období v letech, pro které se odpis počítá, je 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) & "."