Office
Prihlásenie

Funkcia SYD

Poznámka: Radi by sme vám čo najrýchlejšie poskytovali najaktuálnejší obsah Pomocníka vo vašom vlastnom jazyku. Táto stránka bola preložená automaticky a môže obsahovať gramatické chyby alebo nepresnosti. Naším cieľom je, aby bol tento obsah pre vás užitočný. Dali by ste nám v dolnej časti tejto stránky vedieť, či boli pre vás tieto informácie užitočné? Tu nájdete anglický článok pre jednoduchú referenciu.

Vráti hodnotu typu Double, ktorá určuje súčtu čísel rokov odpis majetku za zadané obdobie.

Syntax

SYD ( náklady, zostatok, životnosť obdobie )

Syntax funkcie SYD obsahuje tieto argumenty:

Argument

Popis

náklady

Povinné. Dvojité určením počiatočné náklady na majetku.

Zostatková

Povinné. Dvojité zadáte hodnotu majetku na konci životnosti.

životnosť

Povinné. Dvojité určenie dĺžky životnosti majetku.

obdobie

Povinné. Dvojité určením obdobia pre správcov aktív odpisy sa počítajú.


Poznámky

Životnosť a obdobie argumentov musia byť vyjadrené v rovnakých jednotkách. Napríklad, ak je životnosť v mesiacoch, obdobie venovať aj v mesiacoch. Hodnoty všetkých argumentov musia byť kladné čísla.

Príklad

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.

Ak sa chcete vrátiť hodnotu odpisu majetku za zadané obdobie uvedené počiatočné náklady aktív (InitCost), zostatková hodnota na konci životnosti majetku (SalvageVal) a celkovú životnosť majetku v tomto príklade sa používa funkcia SYD rokov (LifeTime). Obdobie v rokoch odpisy sa 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) & "."
Rozšírte svoje zručnosti práce s balíkom Office
Preskúmať školenie
Buďte medzi prvými, ktorí získajú nové funkcie
Pridajte sa k insiderom pre Office

Boli tieto informácie užitočné?

Ďakujeme za vaše pripomienky!

Ďakujeme vám za pripomienky. Pravdepodobne vám pomôže, ak vás spojíme s pracovníkom podpory pre Office.

×