SYD Function [VBA]

Returns the arithmetic-declining depreciation rate.

warning

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.


Syntax:


SYD (Cost as Double, Salvage as Double, Life as Double, Period as Double)

Return value:

Double

Parameters:

取得価額 は、資産を購入した時点での価格です。

残存価額 は、減価償却後の資産の価格です。

耐用年数 は、資産の償却期間数を決定する償却期間です。

Period is the period number for which you want to calculate the depreciation.

Error codes:

5 無効なプロシージャー呼び出しです

Example:


REM ***** BASIC *****
Option VBASupport 1
Sub ExampleSYD
REM Calculate the yearly depreciation of an asset that cost $10,000 at
REM the start of year 1, and has a salvage value of $1,000 after 5 years.
Dim syd_yr1 As Double
REM Calculate the depreciation during year 1.
syd_yr1 = SYD( 10000, 1000, 5, 1 )
print syd_yr1 ' syd_yr1 is now equal to 3000.
End Sub

ご支援をお願いします!