SYD függvény

Dupla értéket ad vissza, amely egy eszköz adott időszakra vonatkozó számjegyeinek összegét adja meg.

Szintaxis

SYD(költség, maradványérték, élettartam, időszak)

Az SYD függvény szintaxisa az alábbi argumentumokat foglalja tartalmazza:

Argumentum	Leírás:
Költség	Kötelező megadni. Az eszköz kezdeti költségének dupla megadása.
Megmenteni	Kötelező megadni. Az objektum értékét a hasznos élettartam végén kétszer kell megadni.
Élet	Kötelező megadni. Az objektum hasznos élettartamának hosszát kétszer kell megadni.
Időszak	Kötelező megadni. Az eszköz értékcsökkenésének kiszámítására szolgáló időszak dupla megadása.

Megjegyzések

Az élettartam- és időszakargumentumokat ugyanabban az egységben kell megadni. Ha például az élet hónapokban van megadva, az időszakot is hónapokban kell megadni. Minden argumentumnak pozitív számnak kell lennie.

Példák lekérdezésre

Kifejezés	Eredmény:
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample;	A "LoanAmount" értékre értékelt eszköz értékcsökkenését számítja ki 10%-os maradványértékkel ("LoanAmount" szorozva 0,1-zel), figyelembe véve, hogy az eszköz hasznos élettartama 20 év. Az értékcsökkenés kiszámítása a második évre történik.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample;	A "LoanAmount" értékre értékelt eszköz értékcsökkenését adja vissza 0 USD maradványértékkel, figyelembe véve, hogy az eszköz hasznos élettartama 20 év. Az eredmények az SLDepreciation oszlopban jelennek meg. Az értékcsökkenés kiszámítása a harmadik évre történik.

VBA-példa

Ez a példa az SYD függvénnyel egy eszköz értékcsökkenését adja vissza egy adott időszakra az eszköz kezdeti bekerülési értéke (InitCost), az eszköz hasznos élettartama végén lévő maradványérték (SalvageVal) és az eszköz teljes élettartama (LifeTime) alapján. Az az időszak, amelyre az értékcsökkenést kiszámítják, a PDeprkövetkező: .

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