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

Vrne dvojno število, ki določa amortizacijo osnovnega sredstva za določeno časovno obdobje z metodo dvojno pojemajočega salda ali katero drugo metodo, ki jo določite.

Sintaksa

DDB( stroški, vrednost_po_amor, št_obdobij, obdobje [, faktor] )

Sintaksa funkcije DDB ima te argumente:

Argument

Opis

strošek

Obvezen. Dvojno število, ki določa začetno ceno sredstva.

Odpadna

Obvezen. Dvojno število, ki določa vrednost sredstva na koncu njegove življenjske dobe.

čas delovanja

Obvezen. Dvojno število, ki določa dolžino življenjske dobe sredstva.

Obdobje

Obvezen. Dvojno število, ki določa obdobje, za katerega se izračuna amortizacija sredstev.

Dejavnik

Neobvezen. Spremenljivka, ki določa stopnjo upadanja salda. Če ga izpustite, se predvideva 2 (metoda z dvojnim upadanjem).

Opombe

Metoda bilance z dvojnim upadanjem izračuna amortizacijo s pospešeno stopnjo. Amortizacija je najvišja v prvem obdobju in v zaporednih obdobjih upada.

Argumenta » življenjska doba« in »obdobje« morata biti izražena v istih enotah. Če je na primer življenjska doba v mesecih, je treba obdobje podati tudi v mesecih. Vsi argumenti morajo biti pozitivna števila.

Funkcija DDB za izračun amortizacije za dano obdobje uporablja to formulo:

Amortizacija / obdobje = ((stroškivrednost_po_amor) * faktor) / življenjska doba

Primer

Opomba: V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru je uporabljena funkcija DDB za vrnitev amortizacije sredstva za določeno obdobje glede na začetno vrednost (InitCost), amortizacijo na koncu življenjske dobe sredstva (SalvageVal), skupno življenjsko dobo sredstva v letih (LifeTime) in obdobje v letih , za katera se izračuna amortizacija (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) & "."

Ali potrebujete dodatno pomoč?

Ali želite več možnosti?

Raziščite ugodnosti naročnine, prebrskajte izobraževalne tečaje, preberite, kako zaščitite svojo napravo in še več.

Skupnosti vam pomagajo postaviti vprašanja in odgovoriti nanje, posredovati povratne informacije in prisluhniti strokovnjakom z bogatim znanjem.