Função DDB [VBA]

Obtém a depreciação de um ativo para um período especificado usando o método aritmético em declínio.

warning

Esta função ou constante é ativada com a instrução Option VBASupport 1 colocada antes do código de programa executável num módulo.


Sintaxe:


DDB(Cost As Double, Salvage As Double, Life as Double, Period as Double, [Factor as Variant])

Valor de retorno:

Double

Parâmetros:

Custo é o custo inicial de um ativo.

Valor_residual é o valor de um ativo no fim da vida útil.

Vida é o número de períodos (por exemplo, anos ou meses) que define quanto tempo o ativo deve ser utilizado.

Período especifica o período para o qual o valor deve ser calculado.

Fator (opcional) é o fator pelo qual a depreciação diminui. Se não for inserido um valor, o valor predefinido será 2.

Utilize esta forma de depreciação se necessitar de um valor de depreciação inicial maior em relação à depreciação linear. O valor de depreciação diminui a cada período. e é geralmente usado para ativos cuja perda de valor é maior logo após a compra (por exemplo, veículos ou computadores). Observe que o valor contábil nunca será zero neste tipo de cálculo.

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:


Sub ExampleDDB
 Dim ddb_yr1 As Double
 ddb_yr1 = DDB(75000,1,60,12,2)
 Print ddb_yr1 ' devolve 1721,81 unidades monetárias.
End Sub