Applies ToAccess за Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Връща стойност от тип Double, указваща амортизацията на актив за конкретен период от време, като използва метода за баланс с двойно намаление или някои друг зададен от вас метод.

Синтаксис

DDB( стойност; ликвидационна_стойност; живот; период [; коефициент] )

Синтаксисът на функцията DDB има следните аргументи:

Аргумент

Описание

разход

Задължително. Стойност от тип Double , указваща началната стойност на актива.

Спасяване

Задължително. Стойност от тип Double , указваща стойността на актива в края на полезния му живот.

времетраене

Задължително. Стойност от тип Double , указваща продължителността на полезния живот на актива.

Период

Задължително. Стойност от тип Double , задаваща период, за който се изчислява амортизацията на актива.

Фактор

Незадължително. Стойност от тип variant, с която балансът намалява. Ако липсва, се приема 2 (метод с двойно намаление).

Забележки

Методът за баланс с двойно намаление изчислява амортизацията с променлива норма. Амортизацията е най-висока в първия период и намалява през следващите периоди.

Аргументите "живот " и "период " трябва да бъдат изразени в едни и същи единици. Например, ако животът се дава в месеци, периодът също трябва да бъде даден в месеци. Всички аргументи трябва да са положителни числа.

Функцията DDB използва следната формула, за да изчисли амортизацията за даден период:

Амортизация / период = ((стойностликвидационна_стойност) * коефициент) / живот

Пример

Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример използва функцията DDB , за да върне амортизацията на актив за зададен период при зададен период при първоначалната стойност (InitCost), остатъчната стойност в края на полезния живот на актива (SalvageVal), общия живот на актива в години (LifeTime) и периода в години, за който се изчислява амортизацията (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) & "."

Нуждаете ли се от още помощ?

Искате ли още опции?

Разгледайте ползите от абонамента, прегледайте курсовете за обучение, научете как да защитите устройството си и още.

Общностите ви помагат да задавате и отговаряте на въпроси, да давате обратна връзка и да получавате информация от експерти с богати знания.