Bejelentkezés Microsoft-fiókkal
Jelentkezzen be, vagy hozzon létre egy fiókot.
Üdvözöljük!
Válasszon másik fiókot.
Több fiókja van
Válassza ki a bejelentkezéshez használni kívánt fiókot.

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

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.

Hasznos volt ez az információ?

Mennyire elégedett a fordítás minőségével?
Mi volt hatással a felhasználói élményére?
Ha elküldi a visszajelzést, a Microsoft felhasználja azt a termékei és szolgáltatásai továbbfejlesztéséhez. Az informatikai rendszergazda képes lesz ezeket az adatokat összegyűjteni. Adatvédelmi nyilatkozat.

Köszönjük a visszajelzését!

×