Cara Menggunakan Rumus Terbilang di Excel

 

Saat membuat laporan keuangan, invoice, atau kuitansi di Excel, sering kali kita perlu mengubah angka menjadi kalimat. Misalnya, angka 1500000 menjadi "Satu Juta Lima Ratus Ribu Rupiah".

Sayangnya, Microsoft Excel belum menyediakan rumus terbilang secara bawaan.

Namun tenang — kita bisa menambahkan fungsi Terbilang sendiri dengan bantuan VBA (Macro). Berikut panduan lengkapnya!

---

Langkah-Langkah Membuat Rumus Terbilang di Excel

1. Buka Jendela VBA

• Tekan tombol Alt + F11 secara bersamaan.

• Akan muncul jendela Microsoft Visual Basic for Applications.

2. Tambahkan Module Baru

• Klik menu Insert → Module.

3. Copy-Paste Kode Berikut

Function Terbilang(ByVal x As Double) As String
    Dim angka As Variant
    angka = Array("", "Satu", "Dua", "Tiga", "Empat", "Lima", "Enam", "Tujuh", "Delapan", "Sembilan", "Sepuluh", "Sebelas")
    
    If x < 12 Then
        Terbilang = " " & angka(Int(x))
    ElseIf x < 20 Then
        Terbilang = Terbilang(x - 10) & " Belas"
    ElseIf x < 100 Then
        Terbilang = Terbilang(Int(x / 10)) & " Puluh" & Terbilang(x Mod 10)
    ElseIf x < 200 Then
        Terbilang = " Seratus" & Terbilang(x - 100)
    ElseIf x < 1000 Then
        Terbilang = Terbilang(Int(x / 100)) & " Ratus" & Terbilang(x Mod 100)
    ElseIf x < 2000 Then
        Terbilang = " Seribu" & Terbilang(x - 1000)
    ElseIf x < 1000000 Then
        Terbilang = Terbilang(Int(x / 1000)) & " Ribu" & Terbilang(x Mod 1000)
    ElseIf x < 1000000000 Then
        Terbilang = Terbilang(Int(x / 1000000)) & " Juta" & Terbilang(x Mod 1000000)
    ElseIf x < 1000000000000# Then
        Terbilang = Terbilang(Int(x / 1000000000)) & " Milyar" & Terbilang(x Mod 1000000000)
    Else
        Terbilang = "Angka terlalu besar"
    End If
    Terbilang = Application.Trim(Terbilang)
End Function

Tutup jendela VBA lalu kembali ke Excel.

---

Cara Menggunakan Rumus Terbilang

Misalnya, angka 1500000 ada di sel A2. Maka ketik rumus berikut:

=Terbilang(A2)

Hasilnya:

Satu Juta Lima Ratus Ribu

Jika ingin menambahkan kata “Rupiah” di belakangnya:

=Terbilang(A2) & " Rupiah"

---

Contoh Tabel

Angka	Rumus	Hasil
2500	=Terbilang(A2)	Dua Ribu Lima Ratus
750000	=Terbilang(A3) & " Rupiah"	Tujuh Ratus Lima Puluh Ribu Rupiah
10000000	=Terbilang(A4)	Sepuluh Juta

---

Penutup

Dengan menambahkan fungsi VBA di Excel, kita bisa membuat rumus terbilang sendiri layaknya fitur bawaan. Sangat berguna untuk:

✔ Invoice

✔ Kwitansi

✔ Slip gaji

✔ Nota pembayaran

✔ Laporan keuangan

Kalau kamu tidak ingin repot membuatnya secara manual, kamu bisa minta saya kirimkan file Excel yang sudah jadi dan tinggal pakai.

Tinggal komentar ya.

Semoga bermanfaat!