SYD Function [VBA]
Returns the arithmetic-declining depreciation rate.
This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.
SYD (Cost as Double, Salvage as Double, Life as Double, Period as Double)
Double
Cost āĻšāĻ˛ā§ āĻāĻāĻāĻŋ āĻ¸āĻŽā§āĻĒāĻĻā§āĻ° āĻĒā§āĻ°āĻžāĻ°āĻŽā§āĻāĻŋāĻ āĻŽā§āĻ˛ā§āĻ¯āĨ¤
Salvage āĻŽā§āĻ˛ā§āĻ¯āĻŽāĻžāĻ¨ āĻšā§āĻ°āĻžāĻ¸ā§āĻ° āĻļā§āĻˇā§ āĻ¸āĻŽā§āĻĒāĻĻā§āĻ° āĻŽā§āĻ˛ā§āĻ¯āĨ¤
Life āĻšāĻ˛ā§ āĻŽā§āĻ˛ā§āĻ¯āĻŽāĻžāĻ¨ āĻšā§āĻ°āĻžāĻ¸ā§āĻ° āĻĒāĻ°ā§āĻ¯āĻžā§āĻāĻžāĻ˛, āĻ¯āĻž āĻ¸āĻŽā§āĻĒāĻĻā§āĻ° āĻŽā§āĻ˛ā§āĻ¯āĻŽāĻžāĻ¨ āĻšā§āĻ°āĻžāĻ¸ā§āĻ° āĻŽā§āĻ āĻĒāĻ°ā§āĻ¯āĻžā§āĻāĻžāĻ˛ āĻ¸āĻāĻā§āĻ¯āĻž āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŖ āĻāĻ°ā§āĨ¤
Period is the period number for which you want to calculate the depreciation.
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