Palauttaa double-arvon, joka määrittää kauden kalusto-argumentin vuosipoiston vuosipoiston.
Syntaksi
SYD( kustannus; loppuarvo; aika; kausi )
SYD-funktion syntaksissa on seuraavat argumentit:
|
Argumentti |
Kuvaus |
|
kustannus |
Pakollinen. Kalusto-kaluston alkuperäinen kustannus määritetään kaksinkertaisiksi. |
|
loppuarvo |
Pakollinen. Kaksinkertainen kalustoryhmän arvo kaluston käyttöajan lopussa. |
|
life |
Pakollinen. Kaksinkertainen arvo, joka määrittää kalustoryhmän käyttöajan pituuden. |
|
piste |
Pakollinen. Double specifying period for which asset depreciation is calculated. |
Huomautuksia
Aika- ja kausiargumentit on ilmaistava samoina yksikköinä. Jos esimerkiksi elinaika annetaan kuukausina, kausi on annettava myös kuukausina. Kaikkien argumenttien on oltava positiivisia lukuja.
Kyselyesimerkkejä
|
Lauseke |
Tulokset |
|
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample; |
Laskee "LoanAmount"-arvona olevan kalustoryhmän poiston, jonka loppuarvo on 10 % ("LoanAmount" kerrottuna 0,1:llä), kun otetaan huomioon 20 vuoden käyttöikä. Poisto lasketaan toisen vuoden osalta. |
|
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; |
Palauttaa "LoanAmount"-arvona olevan kalustoerän poiston, jonka loppuarvo on 0 $, kun otetaan huomioon 20 vuoden käyttöaika. Tulokset näytetään sarakkeessa SLDepreciation. Poisto lasketaan kolmantena vuonna. |
VBA-esimerkki
Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Tässä esimerkissä KÄYTETÄÄN VUOSIPOISTO-funktiota kaluston poiston palauttamiseen määritetyn kauden ajalta, kun kalustoryhmän alkuperäinen kustannus (InitCost), kalustoryhmän käyttöajan lopussa (SalvageVal) loppuarvo ja kalusto-arvon kokonaisaika vuosina (LifeTime). Kausi, jonka vuosille poisto lasketaan, on 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) & "."
