Funktsioon DDB

Märkus.: Soovime pakkuda teie keeles kõige ajakohasemat spikrisisu niipea kui võimalik. See leht on tõlgitud automaatselt ja sellel võib leiduda grammatikavigu või ebatäpsusi. Tahame, et sellest sisust oleks teile abi. Palun märkige selle lehe allservas, kas sellest teabest oli teile kasu või mitte. Soovi korral saab ingliskeelset artiklit lugeda siit.

Tagastab kahekordne, mis määrab vara amortisatsiooni teatud aja jooksul, kasutades topeltdegressiivset amortisatsioonimeetodit või mõnda muud teie määratud meetodit.

Süntaks

DDB ( maksumus, jääk, kestus, periood [tegur] )

Funktsiooni DDB süntaksil on järgmised argumendid.

Argument

Kirjeldus

kulu

Nõutav. Kahekordne määrab vara esialgne maksumus.

Jääk

Nõutav. Kahekordne määrab vara kasulik tööiga selle lõpus väärtuse.

Kestus

Nõutav. Kahekordne määrab vara kasulik tööiga pikkus.

perioodi kohta.

Nõutav. Millist vara arvutatakse kahekordseks määrab perioodi amortisatsioon.

dispersioonanalüüs

Valikuline. Variandi, mis määrab määr amortisatsiooninorm väheneb. Kui puudub, eeldatakse 2 (topeltdegressiivset meetod).


Kommentaarid

Topeltdegressiivset amortisatsioonimeetodit arvutab amortisatsiooni kiirendatud tempos. Amortisatsioon on kõrgeim esimesel perioodil ja väheneb järjestikuste perioodide.

Sama üksuste ühik elavamaks ja perioodi argumendid. Näiteks kui kuudes kestus , periood ka tuleb kuudes. Kõik argumendid peavad olema positiivsed arvud.

Funktsiooni DDB kasutab antud perioodi amortisatsioon arvutamiseks järgmist valemit:

Amortisatsioon / periood = ((maksumusjääk) * tegur) / kestus

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni DDB Tagastab vara määratud perioodi antud esialgne maksumus (InitCost) jääkväärtus vara kasulik tööiga (SalvageVal) lõpus kokku kestus aastates vara amortisatsiooni (_z2z _), ja perioodi aasta amortisatsioon on arvutatud (Depr).

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, Depr
Const YRMOS = 12 ' Number of months in a year.
Fmt = "###,##0.00"
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("Enter the asset's value at end of its life.")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YRMOS ' 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 / YRMOS ' Convert months to years.
If LifeTime <> Int(MonthLife / YRMOS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("Enter year for depreciation calculation."))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = InputBox("Enter year for depreciation calculation.")
Loop
Depr = DDB(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & _
Format(Depr, Fmt) & "."
Täiendage Office'i kasutamise oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×