Fungsi DDB

Penting: Artikel ini adalah terjemahan mesin, lihat penafian. Temukan versi bahasa Inggris artikel di sini sebagai rujukan Anda.

Mengembalikan ganda yang menentukan nilai depresiasi aset untuk periode waktu tertentu dengan menggunakan metode saldo menurun-ganda atau beberapa metode lain yang Anda tentukan.

Sintaks

DDB ( biaya sisa kehidupan, periode [faktor] )

Sintaks fungsi DDB memiliki argumen ini:

Argumen

Deskripsi

biaya

Diperlukan. Ganda menentukan biaya awal aset.

sisa

Diperlukan. Ganda menentukan nilai aset di akhir masa yang berguna.

kehidupan

Diperlukan. Ganda menentukan panjang umur berguna aset.

periode

Diperlukan. Ganda menentukan periode untuk aset mana depresiasi dihitung.

faktor

Opsional. Varian menentukan tingkat di mana saldo menurun. Jika dihilangkan, 2 (metode menurun-ganda) dianggap.


Keterangan

Metode saldo menurun-ganda menghitung depresiasi sejalan dengan. Depresiasi tertinggi dalam periode pertama dan berkurang berturut-turut periode.

Kehidupan dan periode argumen harus dinyatakan dalam unit yang sama. Misalnya, jika kehidupan diberikan dalam bulan, periode harus juga diberikan dalam bulan. Semua argumen harus berupa bilangan positif.

Fungsi DDB menggunakan rumus berikut untuk menghitung depresiasi untuk periode tertentu:

Depresiasi / periode = ((biaya - sisa) * faktor) / Umur pakai

Contoh

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 DDB untuk mengembalikan nilai depresiasi aset untuk periode tertentu yang diberikan biaya awal (InitCost), nilai sisa di akhir umur berguna aset (SalvageVal), total Umur pakai aset dalam tahun (LifeTime), dan periode dalam tahun yang depresiasi adalah terhitung (Depr).

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, Depr
Const YRMOS = 12 ' Number of months in a year.
Fmt = "###,##0.00"
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("Enter the asset's value at end of its life.")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YRMOS ' 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 / YRMOS ' Convert months to years.
If LifeTime <> Int(MonthLife / YRMOS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("Enter year for depreciation calculation."))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = InputBox("Enter year for depreciation calculation.")
Loop
Depr = DDB(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & _
Format(Depr, Fmt) & "."

Catatan: Penafian Terjemahan Mesin: Artikel ini telah diterjemahan oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan terjemahan mesin ini untuk membantu pengguna yang bukan penutur bahasa Inggris agar dapat menikmati konten tentang produk, layanan, dan teknologi Microsoft. Karena artikel ini diterjemahkan oleh mesin, mungkin akan terdapat kesalahan kosa kata, sintaksis, atau tata bahasa.

Kembangkan keterampilan Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×