SLN Function [VBA]

SLN (Cost as Double, Salvage as Double, Life as Double)

REM ***** BASIC *****

Option VBASupport 1

Sub ExampleSLN

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 y_dep As Double

y_dep = SLN( 10000, 1000, 6 )

print y_dep ' returns 1500.

End Sub