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:
|
argumentumok |
Leírás |
|
költség |
Megadása kötelező. Az eszköz kezdeti költségének dupla megadása. |
|
Megmenteni |
Megadása kötelező. Az objektum értékét a hasznos élettartam végén kétszer kell megadni. |
|
élettartam |
Megadása kötelező. Az objektum hasznos élettartamának hosszát kétszer kell megadni. |
|
Időszak |
Megadása kötelező. 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
|
Expression |
Eredmények |
|
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
Megjegyzés: A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
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 értékcsökkenés kiszámításának időszaka 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) & "."
