Applies ToMicrosoft 365-höz készült Access Access 2024 Access 2021 Access 2019 Access 2016

Dupla értéket ad vissza, amely egy eszköz értékcsökkenését adja meg egy adott időszakra a kétszeresen csökkenő egyenleg vagy más megadott módszer használatával.

Szintaxis

DDB( költség; maradványérték; élettartam; időszak [, tényező] )

A DDB 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 dupla megadásával.

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.

Tényező

Nem kötelező. Variant, amely azt a mértéket határozza meg, amelynél az egyenleg csökken. Ha nincs megadva, a rendszer 2-t (dupla degresszív módszert) feltételez.

Megjegyzések

Az állandó leírási kulcsot használó gyorsított értékcsökkenés gyorsított ütemben számolja el az amortizációt. Az értékcsökkenés nagysága az első időszakban a legnagyobb, az ezt követő időszakokban folyamatosan csökken.

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.

A DDB függvény az alábbi képletet használja egy adott időszakra vonatkozó értékcsökkenés kiszámításához:

Értékcsökkenés / időszak = ((költségmaradványérték) * tényező) / élettartam

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 a DDB függvénnyel adja vissza egy eszköz értékcsökkenését egy adott időszakra vonatkozóan a kezdeti költség (InitCost), az eszköz hasznos élettartamának végén lévő maradványérték (SalvageVal), az eszköz teljes élettartama években (LifeTime) és azokban az években, amelyekben az értékcsökkenést kiszámítják (Depr).

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, DeprConst 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?")LoopLifeTime = 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.")LoopDepr = DDB(InitCost, SalvageVal, LifeTime, DepYear)MsgBox "The depreciation for year " & DepYear & " is " & _Format(Depr, Fmt) & "."

További segítségre van szüksége?

További lehetőségeket szeretne?

Fedezze fel az előfizetés előnyeit, böngésszen az oktatóanyagok között, ismerje meg, hogyan teheti biztonságossá eszközét, és így tovább.

A közösségek segítségével kérdéseket tehet fel és válaszolhat meg, visszajelzést adhat, és részletes ismeretekkel rendelkező szakértőktől hallhat.