Funkce DDB

Důležité informace:  Tento článek je strojově přeložený – přečtěte si toto upozornění. Anglickou verzi tohoto článku pro referenci najdete tady.

Vrátí hodnotu typu Double určující odpis aktiva pro určité období pomocí dvojité degresivní metody odpisu nebo jiné metody, kterou zadáte.

Syntaxe

Odpis.ZRYCH2 ( náklady, zůstatek, životnost, období [Faktor] )

Syntaxe funkce odpis.ZRYCH2 obsahuje následující argumenty:

Argument

Popis

pole náklady

Povinné. Double určující pořizovací cena majetku.

Zůstatek

Povinné. Double určující hodnotu materiály na konci jeho životnost.

životnost

Povinné. Double určující délce životnosti majetku.

období

Povinné. Double určující období které položka počítá odpisů.

faktor

Volitelné. Varianty určující míru niž odepisování. Pokud není uveden, předpokládá se 2 (dvojité degresivní metody).


Poznámky

Dvojité degresivní metody odpisu s pevným počítá odpisů při degresivní sazbě. Odpis je nejvyšší v první období a zmenší po sobě jdoucí období.

Argumenty životnost a období musí vyjádřený v stejné jednotky. Například pokud je v měsících životnost , období musí být rovněž v měsících. Všechny argumenty musí být kladná čísla.

Funkce DDB používá následující vzorec pro výpočet odpis za dané období:

Odepisování / období = ((náklady - Zůstatek) * Faktor) / životnost

Příklad

Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.

Tento příklad používá funkci DDB k Vrátí odpis aktiva za určité období uvedené pořizovací cena (InitCost), zůstatková hodnota na konci majetku životnosti (SalvageVal), celková životnost aktiva v letech (LifeTime) a období v letech, u kterých je vypočtena (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) & "."

Poznámka: Upozornění ke strojovému překladu: Tento článek přeložil počítačový systém bez zásahu člověka. Společnost Microsoft nabízí tyto strojové překlady proto, aby umožnila uživatelům, kteří nemluví anglicky, získat informace o produktech, službách a technologiích této společnosti. Protože je tento článek strojově přeložený, může obsahovat slovní, syntaktické nebo gramatické chyby.

Rozšiřte své znalosti a dovednosti
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor. Vypadá to, že bude užitečné, když vás spojíme s některým z našich agentů z podpory Office.

×