CARA MENAMBAHKAN RUMUS TERBILANG DI EXCEL DENGAN CARA MANUAL TANPA MACRO

 

CARA MENGGUNAKAN RUMUS TERBILANG TANPA MACRO

Terkadang kita sering kesulitan dengan penggunaan rumus terbilang pada aplikasi excel yang menggunakan bantuan macro, ketika pindah ke komputer lain jika tidak ada macro yang terpasang terpaksa kita harus memasangkannya dulu agar terbilangnya bisa muncul.

Sekarang kita akan coba menggunakan rumus terbilang yang tidak menggunakan bantuan macro atau VB dan tidak akan berpengaruh jika kita berpindah dari perangkat komputer lain maka rumus terbilangnya pun tidak akan hilang.

Bagaimana caranya, yuk kita simak sampai akhir!!!

Gambar diatas adalah contoh penggunaan rumus terbilang yang tidak menggunakan macro, kita tinggal salin saja rumus dibawah ini.

1. Terbilang dengan angka desimal (koma)

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(A2;"#,00"); 0;"Nol ");1;"Satu ");2;"Dua ");3;"Tiga ");4;"Empat ");5;"Lima ");6;"Enam ");7;"Tujuh ");8;"Delapan ");9;"Sembilan ");",";"Koma ")

2. Terbilang dengan angka pembulatan

=PROPER(IF(A2=0;"nol";IF(A2<0;"minus ";"")& SUBSTITUTE(TRIM(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE( IF(--MID(TEXT(ABS(A2);"000000000000000");1;3)=0;"";MID(TEXT(ABS(A2);"000000000000000");1;1)&" ratus "&MID(TEXT(ABS(A2);"000000000000000");2;1)&" puluh "&MID(TEXT(ABS(A2);"000000000000000");3;1)&" trilyun ")& IF(--MID(TEXT(ABS(A2);"000000000000000");4;3)=0;"";MID(TEXT(ABS(A2);"000000000000000");4;1)&" ratus "&MID(TEXT(ABS(A2);"000000000000000");5;1)&" puluh "&MID(TEXT(ABS(A2);"000000000000000");6;1)&" milyar ")& IF(--MID(TEXT(ABS(A2);"000000000000000");7;3)=0;"";MID(TEXT(ABS(A2);"000000000000000");7;1)&" ratus "&MID(TEXT(ABS(A2);"000000000000000");8;1)&" puluh "&MID(TEXT(ABS(A2);"000000000000000");9;1)&" juta ")& IF(--MID(TEXT(ABS(A2);"000000000000000");10;3)=0;"";IF(--MID(TEXT(ABS(A2);"000000000000000");10;3)=1;"*";MID(TEXT(ABS(A2);"000000000000000");10;1)&" ratus "&MID(TEXT(ABS(A2);"000000000000000");11;1)&" puluh ")&MID(TEXT(ABS(A2);"000000000000000");12;1)&" ribu ")& IF(--MID(TEXT(ABS(A2);"000000000000000");13;3)=0;"";MID(TEXT(ABS(A2);"000000000000000");13;1)&" ratus "&MID(TEXT(ABS(A2);"000000000000000");14;1)&" puluh "&MID(TEXT(ABS(A2);"000000000000000");15;1));1;"satu");2;"dua");3;"tiga");4;"empat");5;"lima");6;"enam");7;"tujuh");8;"delapan");9;"sembilan");"0 ratus";"");"0 puluh";"");"satu puluh 0";"sepuluh");"satu puluh satu";"sebelas");"satu puluh dua";"duabelas");"satu puluh tiga";"tigabelas");"satu puluh empat";"empatbelas");"satu puluh lima";"limabelas");"satu puluh enam";"enambelas");"satu puluh tujuh";"tujuhbelas");"satu puluh delapan";"delapanbelas");"satu puluh sembilan";"sembilanbelas");"satu ratus";"seratus");"*satu ribu";"seribu");0;""));" ";" ")))

3. Terbilang dengan angka pembulatan yang ditambah dengan mata uang (rupiah, dolar atau lainnya) seperti pada contoh pada gambar

Salin rumus terbilang dengan pembulatan (pada poin 2) kemudian ditambahkan kalimat rupiah

=rumus terbilang di poin 2&" Rupiah"

Catatan:

1. Untuk angka 70,54 karena disimpan pada cell A2 maka pada rumus terbilang di excelnya pun ditulis A2 (tulisan warna biru), tinggal di replace saja menyesuaikan dengan cell yang digunakan.
2. Untuk merubah tampilan huruf apakah mau menggunakan huruf KAPITAL, kecil, atau BESAR kecil maka tinggal diganti saja (KAPITAL =UPPER, KECIL =LOWER, BESAR KECIL =PROPER)
3. Untuk tanda baca titik koma (;) bisa juga pakai koma (,) pada rumus tersebut tergantung pada perangkat komputer masing-masing kebutuhannya menggunakan koma (,) atau titik koma (;)

Itulah salah satu cara untuk membuat rumus terbilang pada aplikasi Ms. Excel, berfungsi untuk semua versi Ms. Excel.