Untuk Nilai maksimal 999
- Jalankan aplikasi spreadsheet Gnumeric
- Pilih lembar kerja pada Sheet1 saja
- Misal Nilai yang ingin disebutkan angkanya berada pada sel A1
- Dan Hasilnya berada pada sel B1.
- Lalu buat Names melalui menu Edit > Modify > Names
- Klik tanda + pada bagian Sheet1 untuk menambahkan Names,
- Lalu ganti <New Name> dengan N dengan cara double-klik
- Dan disebelah kanan dari Name N diisi dengan (double-klik juga) :
{"Satu","Dua","Tiga","Empat","Lima","Enam","Tujuh","Delapan","Sembilan"}
- Setelah selesai menulis isinya, tekan [Enter], lalu Close untuk menutup jendela Define Names
- Pada sel B1, copy-paste formula berikut (buang tanda kutip tunggal di depan formula saat paste):
=if(-(-int(A1))=0,"Nol ",if(-(-(left(text(int(A1),"000"))))=1,"Seratus ",if(-(-(left(text(int(A1),"000"))))>1,index(N,1,-(-(left(text(int(A1),"000")))))&" Ratus ","")))&if(-(-(mid(text(int(A1),"000"),2,1)))=0,"",if(-(-(mid(text(int(A1),"000"),2,1)))=1,choose((-(-(right(text(int(A1),"0"))))=0)*1+((-(-(right(text(int(A1),"0"))))=1)*2)+((-(-(right(text(int(A1),"0"))))>1)*3),"Sepuluh ","Sebelas ",index(N,1,-(-(right(text(int(A1),"0")))))&"Belas "),if(-(-(mid(text(int(A1),"000"),2,1)))>1,index(N,1,-(-(mid(text(int(A1),"000"),2,1))))&" Puluh ")))&if(or(-(-(mid(text(int(A1),"000"),2,1)))=1,-(-(right(text(int(A1),"0"))))=0),"",index(N,1,-(-(right(text(int(A1),"0")))))) |
Untuk Nilai maksimal 999 Triliun
- Sama saja dengan yang di atas namun harus kita bagi per tiga-digit dari 15 digit bilangan
- Pastikan sudah terdapat Names N (untuk indexing) dengan isi sama seperti di atas yaitu:
{"Satu","Dua","Tiga","Empat","Lima","Enam","Tujuh","Delapan","Sembilan"}
- Isi pada input box formula untuk tiap sel seperti yang tertera pada tabel berikut (jangan lupa buang tanda kutip tunggal saat paste):
Sel | Formula / Nilai | Fungsi |
---|---|---|
A1 | Isi dengan sembarang angka | Nilai Masukan |
B1 | =text(A1,rept("0",15)) | Mengubah isi sel A1 menjadi teks berformat "000,000,000,000,000" |
C1 | =right(left($B1,len($B1)-12),3) | 3 digit trilyun (teks) |
D1 | =right(left($B1,len($B1)-9),3) | 3 digit milyar (teks) |
E1 | =right(left($B1,len($B1)-6),3) | 3 digit juta (teks) |
F1 | =left(right($B1,6),3) | 3 digit ribu (teks) |
G1 | =right($B1,3) | 3 digit satuan (teks) |
H1 | =if(-(-int(C1))=0,"",if(-(-(left(text(int(C1),"000"))))=1,"Seratus ",if(-(-(left(text(int(C1),"000"))))>1,index(N,1,-(-(left(text(int(C1),"000")))))&" Ratus ","")))&if(-(-(mid(text(int(C1),"000"),2,1)))=0,"",if(-(-(mid(text(int(C1),"000"),2,1)))=1,choose((-(-(right(text(int(C1),"0"))))=0)*1+((-(-(right(text(int(C1),"0"))))=1)*2)+((-(-(right(text(int(C1),"0"))))>1)*3),"Sepuluh ","Sebelas ",index(N,1,-(-(right(text(int(C1),"0")))))&" Belas "),if(-(-(mid(text(int(C1),"000"),2,1)))>1,index(N,1,-(-(mid(text(int(C1),"000"),2,1))))&" Puluh ")))&if(or(-(-(mid(text(int(C1),"000"),2,1)))=1,-(-(right(text(int(C1),"0"))))=0),"",index(N,1,-(-(right(text(int(C1),"0")))))) | ubah nilai trilyun ke kata |
I1 | copy dari H1 | ubah nilai milyar ke kata |
J1 | copy dari H1 | ubah nilai juta ke kata |
K1 | copy dari H1 | ubah nilai ribu ke kata |
L1 | copy dari H1 | ubah nilai satuan ke kata |
M1 | =if(-(-int(A1))=0,"Nol",substitute(if(-(-C1)=0,"",H1&" Trilyun ")&if(-(-D1)=0,"",I1&" Milyar ")&if(-(-E1)=0,"",J1&" Juta ")&if(-(-F1)=0,"",if(-(-F1)=1," Seribu ",K1&" Ribu "))&if(-(-G1)=0,"",L1)," "," ")) | Hasil Konversi |
Hasilnya seperti contoh berikut:
Agar dapat digunakan pada Sheet lainnya, gunakan cara copy > paste special > paste link untuk Nilai inputan dan hasilnya
- Misal ada Sheet yang berisi satu sel, misal: D5 yang berisi angka yang akan kita ubah
- Maka kita copy isi sel D5, lalu pindah ke Sheet yang telah kita isi dengan formula di atas
- Klik kanan pada sel A1, Paste Special > Paste Link
- Setelah mendapatkan hasilnya pada sel M1, isi M1 di-copy lalu pindah ke Sheet sebelumnya
- Klik kanan pada sel untuk tempat hasilnya, misal D6, Klik kanan pada sel D6, Paste Special > Paste Link
Untuk nilai yang menggunakan sistem pecahan sen atau koma-komaan dapat dilihat pada bahasan terbilang bagian kedua.
Tidak ada komentar:
Posting Komentar