Mengembalikan Double yang menentukan depresiasi aset digit jumlah tahun untuk periode tertentu.
Sintaks
SYD( cost, salvage, life, period )
Sintaks fungsi SYD memiliki argumen ini:
|
Argumen |
Deskripsi |
|
biaya |
Diperlukan. Ganda menentukan biaya awal aset. |
|
Menyelamatkan |
Diperlukan. Ganda menentukan nilai aset di akhir masa pakainya yang berguna. |
|
Kehidupan |
Diperlukan. Ganda menentukan panjang masa pakai aset yang berguna. |
|
Periode |
Diperlukan. Ganda menentukan periode depresiasi aset yang dihitung. |
Keterangan
Argumen life and period harus dinyatakan dalam satuan yang sama. Misalnya, jika kehidupan diberikan dalam bulan, periode juga harus diberikan dalam bulan. Semua argumen harus berupa angka positif.
Contoh kueri
|
Ekspresi |
Hasil |
|
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample; |
Menghitung depresiasi untuk aset yang dinilai sebagai "LoanAmount", dengan nilai keselamatan 10% ("LoanAmount" dikalikan dengan 0,1), mengingat umur aset yang berguna menjadi 20 tahun. Depresiasi dihitung untuk tahun kedua. |
|
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; |
Mengembalikan depresiasi untuk aset yang dinilai sebagai "LoanAmount", dengan nilai sisa $0, mengingat umur aset yang berguna adalah 20 tahun. Hasilnya ditampilkan di kolom SLDepreciation. Depresiasi dihitung untuk tahun ketiga. |
Contoh VBA
Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi SYD untuk mengembalikan depresiasi aset untuk periode tertentu dengan biaya awal aset (InitCost), nilai sisa di akhir masa pakai aset (SalvageVal), dan total umur aset dalam tahun (LifeTime). Periode dalam tahun di mana depresiasi dihitung PDepr.
Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, PDepr
Const YEARMONTHS = 12 ' Number of months in a year.
Fmt = "###,##0.00" ' Define money format.
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("What's the asset's value at the end of its life?")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YEARMONTHS ' 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 / YEARMONTHS ' Convert months to years.
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("For which year do you want depreciation?"))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = CInt(InputBox("For what year do you want depreciation?"))
Loop
PDepr = SYD(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & Format(PDepr, Fmt) & "."
