Funkcija SYD

Pateikia dvigubą skaičių, nurodantį nurodyto laikotarpio turto metų skaičiaus nusidėvėjimą.

Sintaksė

SYD(kaina, likvidacinė_v, eksploatav, laikotarpis)

Funkcijos SYD sintaksė turi tokius argumentus:

Argumentas	Aprašymas
kaina	Būtinas. Dvigubas skaičius , nurodantis pradinę turto kainą.
Gelbėjimas	Būtinas. Dvigubas nurodantis turto vertę jo naudingo tarnavimo laiko pabaigoje.
gyvenimas	Būtinas. Dvigubas nurodantis turto naudingo tarnavimo laiką.
laikotarpis	Būtinas. Dvigubas nurodo laikotarpį, kuriam skaičiuojamas turto nusidėvėjimas.

Pastabos

Gyvenimo irlaikotarpio argumentai turi būti išreikšti tais pačiais vienetais. Pavyzdžiui, jei gyvenimas nurodomas mėnesiais, laikotarpis taip pat turi būti nurodytas mėnesiais. Visi argumentai turi būti teigiami skaičiai.

Užklausų pavyzdžiai

Išraiška	Rezultatai
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample;	Apskaičiuoja turto, vertinamo kaip "Paskolos suma", nusidėvėjimą su likvidacine verte 10 % ("Paskolos suma" padauginta iš 0,1), atsižvelgiant į tai, kad turto naudingo tarnavimo laikas yra 20 metų. Amortizacija skaičiuojama antriems metams.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample;	Grąžina turto, įvertinto kaip "Paskolos suma", nusidėvėjimą su likvidacine verte 0 EUR, atsižvelgiant į turto naudingumo trukmę 20 metų. Rezultatai rodomi stulpelyje SLDepreciation. Amortizacija skaičiuojama už trečius metus.

VBA pavyzdys

Šiame pavyzdyje naudojama funkcija SYD , grąžinanti turto nusidėvėjimą per nurodytą laikotarpį, atsižvelgiant į turto pradinę kainą (InitCost), likvidacinę vertę turto naudingo tarnavimo laiko pabaigoje ()SalvageVal ir bendrą turto eksploatavimo laiką metais (LifeTime). Laikotarpis metais, kurio nusidėvėjimas skaičiuojamas, yra 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) & "."