Applies ToAccess pentru Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Returnează o valoare Dublă precizie care specifică amortizarea unui mijloc fix pentru o anumită perioadă de timp, utilizând metoda balanței dublu descrescătoare sau altă metodă specificată.

Sintaxă

DDB( cost, recuperat, durată, perioadă [, factor] )

Sintaxa funcției DDB are următoarele argumente:

Argument

Descriere

cost

Obligatoriu. Dublă precizie specificând costul inițial al mijlocului fix.

Salvare

Obligatoriu. Dublă precizie specificând valoarea mijlocului fix la sfârșitul duratei sale de utilizare.

durată

Obligatoriu. Double specificând durata de utilizare a mijlocului fix.

Perioada

Obligatoriu. Dublă precizie specifică perioada pentru care se calculează amortizarea mijlocului fix.

Factor

Opțional. Variant care specifică rata de descreștere a soldului. Dacă se omite, se consideră 2 (metodă dublu descrescătoare).

Observații

Metoda balanței dublu-regresive calculează amortizarea cu o rată accelerată. Amortizarea este mare în prima perioadă și descrește în timp.

Argumentele viață și perioadă trebuie exprimate în aceleași unități. De exemplu, dacă durata de viață este exprimată în luni, perioada trebuie să fie dată și în luni. Toate argumentele trebuie să fie numere pozitive.

Funcția DDB utilizează următoarea formulă pentru a calcula amortizarea pentru o perioadă dată:

Amortizare / perioadă = ((costrecuperat) * factor) / durată

Exemplu

Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Acest exemplu utilizează funcția DDB pentru a returna amortizarea unui mijloc fix pentru o perioadă specificată, dată fiind costul inițial (InitCost), valoarea reziduală la sfârșitul duratei de utilizare a mijlocului fix (SalvageVal), durata totală a mijlocului fix în ani (LifeTime) și perioada în ani pentru care se calculează amortizarea (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) & "."

Aveți nevoie de ajutor suplimentar?

Doriți mai multe opțiuni?

Explorați avantajele abonamentului, navigați prin cursurile de instruire, aflați cum să vă securizați dispozitivul și multe altele.

Comunitățile vă ajută să adresați întrebări și să răspundeți la întrebări, să oferiți feedback și să primiți feedback de la experți cu cunoștințe bogate.