Funkcia SYD

Vzťahuje sa na
Access pre Microsoft 365 Access 2021 Access 2019 Access 2016

Vráti hodnotu typu Double, ktorá určuje odpis majetku za zadané obdobie podľa metódy odpisovania s faktorom súčtu čísel rokov.

Syntax

SYD(cena; zostatok; životnosť; obdobie)

Syntax funkcie SYD má tieto argumenty:

Argument Popis
cena Povinný argument. Dvojité zadanie počiatočnej ceny položky aktív.
zostatková hodnota Povinný argument. Dvojité zadanie hodnoty majetku na konci jeho životnosti.
výdrž Povinný argument. Dvojité zadanie dĺžky životnosti položky aktív.
bodka Povinný argument. Hodnota typu Double určujúca obdobie, za ktoré sa vypočítava odpis majetku.

Poznámky:

Argumenty životnosť a obdobie musia byť vyjadrené v rovnakých jednotkách. Napríklad, ak je život uvedený v mesiacoch, obdobie musí byť tiež uvedené v mesiacoch. Všetky argumenty musia byť kladné čísla.

Príklady dotazov

Výraz Výsledky
SELECT SYD([SumaPôžičky];[ČiastkaPôžičky]*,1;20;2) AS Expr1 FROM FinančnáVzorka; Vypočíta odpis majetku s hodnotou SumaPohľadnice pri zostatkovej hodnote 10 % (SumaPôžičky) vynásobené hodnotou 0,1), pričom sa berie do úvahy, že životnosť majetku je 20 rokov. Odpis sa vypočítava za druhý rok.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; Vráti hodnotu odpisu majetku s hodnotou LoanAmount, pričom zostatková hodnota je 0 $, ak sa životnosť majetku považuje za 20 rokov. Výsledky sa zobrazia v stĺpci SLDepreciation. Odpis sa vypočítava za tretí rok.

Príklad VBA

Poznámka

Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.

V tomto príklade je funkcia SYD použitá na vrátenie odpisu majetku za zadané obdobie vzhľadom na počiatočnú obstarávaciu cenu majetku (InitCost), zostatkovú hodnotu na konci doby použiteľnosti majetku (SalvageVal) a celkovú životnosť majetku v rokoch (LifeTime). Obdobie v rokoch, pre ktoré sa vypočítava odpis, 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) & "."