Prakata

Menetapkan rumus: angka, case, teks, tangal, terbilang, jumlah, dan acuan.

Ada dua hal yang sering saya pakai. Yang pertama mencari selisih tanggal, untuk mencari penyusutan.

Yang kedua mencari nilai terbilang, yang saya pakai untuk invoice.

Daftar Isi

• Prakata: Daftar Isi

• Tanggal

• Terbilang

• Penutup

Unduh Berkas

Gratis nih bro!

Lembar kerja spreadsheet tersedia, supaya teman-teman bisa copy-paste.

• Berkas Excel: 03-formula.xlsx

---

Tanggal

Selisih tanggal ini, variasinya banyak tergantung parameter selisih yang dipakai, yang contoh prakteknya dapat langsung dilihat di bawah ini:

Parameter d, m, y, md dan ym ini, juga dapat ditulis dalam referensi cell. Jadi tidak harus ditulis di formula yaaa..

=DATEDIF(C5;D5;E5)
=DATEDIF(C6;D6;E6)
=DATEDIF(C7;D7;E7)
=DATEDIF(C8;D8;E8)
=DATEDIF(C9;D9;E9)

---

Terbilang

Rumus terbilang bukanlah hal yang baku tersedia di Excel maupun Calc. Di Excel harus mengintall add-ins dahulu, silahkan di cari sendiri. Sementara di Libreoffice Calc harus memasang extensions numbertext dahulu yaitu:

• Number Text Extension

Setelah itu bikin macro secara global supaya dapat menggunakan fungsi terbilang.

Function terbilang(a as double) as string
    Dim oService As Object
    Set oService = createUnoService("com.sun.star.sheet.FunctionAccess")
    terbilang = oService.callFunction("numbertext", Array(a, "id"))
end Function

Dengan cara ini, maka rumus terbilang akan compatible, baik dibuka di Excel, maupun Calc. Namun jangan lupa kalau di Excel tidak ada rumus numbertext.

Contoh prakteknya adalah untuk mencari nilai rupiah:

NUMBERTEXT(D3)
TERBILANG(D3)
PROPER(TERBILANG(D3))&" Rupiah."

Dari masukan:

123.456.789,12

Maka keluarannya adalah:

Seratus Dua Puluh Tiga Juta
Empat Ratus Lima Puluh Enam Ribu
Tujuh Ratus Delapan Puluh Sembilan
Koma Satu Dua Rupiah.

Saya berikan newline supaya lebih mudah dibaca.

---

Apa Selanjutnya?

Lanjut baca yuk. [Lembar Kerja - Rumus Penjumlahan].