Terjemahan Uang Pada Microsoft Excel tanpa Visual Basic

Kini dari waktu ke waktu, tidak terasa sudah lima hari kita menjalani waktu di tahun 2013 ini. Banyak hal yang kita alami, tetapi suatu kreatifitas tidak akan pernah berhenti. Harapan itu adalah semangat, berfikir kreatif akan lebih bersemangat lagi.

Kali ini saya sedang berbagi pengetahuan dan pengalaman dengan anda sahabat saya yang tercinta, masih pada topik Microsoft Excel.

Ada juga yang yang menyebut sebagai jumlah terbilang atau terbilang. Tetapi saya mengambil judul Terjemahan Uang Pada Microsoft Excel tanpa Visual Basic. Mungkin judul yang tepat karena memang hanya mengandalkan fungsi yang ada di Microsoft Excel saja tanpa ada unsur software atau aplikasi dari luar Microsoft Excel.

Kita langsung saja :
Untuk mendapatkan terjemahan uang pada Microsoft Excel kita menggunakan beberapa fungsi antara lain :

• fungsi IF
• fungsi INT
• fungsi SUM
• fungsi VLOOKUP

Dengan fungsi-fungsi diatas, rasanya sudah cukup untuk membuat sebuah kuetansi sehingga pada kwitansi jika diketikkan nilai nominal misalnya sebesar Rp. 2.350.753,00 maka pada bagian penjelasan dengan huruf maka akan langsung diterjemahkan menjadi "Dua juta tiga ratus lima puluh ribu tujuh ratus lima puluh tiga rupiah", tanpa harus mengetikkan nilai tersebut dengan kalimat.

Nah bagaimana caranya ?

Karena ini proses yang memang sedikit memerlukan konsentrasi, maka saya akan bagi dalam beberapa posting . Untuk yang pertama ini saya akan memulai dengan nilai ratusan terlebih dahulu.

Sesuai dengan gambar di atas, nilai ratusannya adalah 753, untuk itu perlu diuraikan terlebih dahulu.

Jika Microsoft Excel anda sudah aktif, terlebih dahulu yang perlu disiapkan adalah daftar untuk terjemahan. Bisa pada Sheet1 bisa juga pada Sheet2. Pada file contoh yang dapat anda Download, saya menggunakan Sheet2 yang saya ganti namanya menjadi Huruf (ini nama sheet, seperti gambar berikut :

Pada contoh, saya memulai pada Cell B3 sampai dengan Cell 25 yang nantinya menggunakan fungsi VLOOKUP untuk menampilkan terjemahannya.

Jika daftar ini sudah anda siapkan, maka kita mulai dengan nilai ratusan terlebih dahulu, yaitu 3 digit terakhir.

Kita kembali pada Sheet1,
pada Cell B2 ketikkan angka 753.
pada Cell C2 input notasi rumus ini : =B2-(INT(B2/1000)*1000).
Tahap-tahapan notasi rumus tersebut adalah :

1. =C2/1000 hasilnya adalah 0.753
2. Tambahkan fungsi INT didepannya sehingga menjadi =INT(C2/1000) hasilnya adalah 0 (nol)
3. Hasil yang kedua kita kalikan lagi dengan 1000 sehingga notasinya menjadi =(INT(C2/1000)*1000) dan hasilnya adalah 0 (nol) juga. Bingung?
4. Terakhir, agar hasilnya menjadi murni ratusan maka Cell B2 kita kurangi dengan hasil yang ke 3 diatas sehingga notasi rumusnya adalah =B2-(INT(C2/1000)*1000) . Nah, disini hasilnya menjadi 753.

Coba deh, pada Cell B2 anda input dengan nilai misalnya 350753, maka hasil pada Cell C2 tetap 753. Dan dari sinilah kita akan menterjemahkan uangnya menjadi huruf dengan fungsi VLOOKUP dari tabel yang anda buat pada sheet2 tadi.

Kita lanjutkan lagi yah..... ( minum air putih banyak-banyak biar nggak tegang  dan sekali-kali lihat keluar jendela, nikmati keindahan yang disuguhkan oleh Allah SWT di luar sana ).

Tahap berikutnya adalah :

1. Pada Cell C4 input fungsi rumus ini : =C2-(INT(C2/10)*10) hasilnya adalah 3 (tiga)
2. Pada Cell C5 input fungsi rumus ini : =(INT(C2/10)/10)*10-(C6*10) hasilnya adalah 5 (lima)
3. Pada Cell C6 input fungsi rumus ini : =INT(C2/100) hasilnya adalah 7 (tujuh)

Jangan bingung ya...., mari konsentrasi penuh

1. Pada Cell E4 input fungsi rumus ini : =IF(C4+C5+C6=0,"",IF(C5=1,VLOOKUP((C5*10)+C4,HURUF!$B$3:$K$43,2),VLOOKUP(C4,HURUF!$B$3:$K$43,2)))&" rupiah" hasilnya adalah tiga rupiah
2. Pada Cell E5 input fungsi rumus ini :=IF(C5=0,"",IF(C5=1,"",VLOOKUP(C5,TERJEMAHAN,2)&" puluh")) hasilnya adalah lima puluh
3. Pada Cell E4 input fungsi rumus ini :=IF(C6=0,"",(IF(C6=1,VLOOKUP(100,TERJEMAHAN,2),VLOOKUP(C6,TERJEMAHAN,2)&" ratus"))) hasilnya adalah tujuh ratus

Keterangan : yang berwarna merah adalah rumus dan yang berwarna biru adalah hasil terjemahan dalam bentuk kalimat ( huruf ).

Sekarang kita masuk pada tahap penggabungan hasil perumusan terjemahan tersebut dengan cara menginput notasi rumus ini : =E6&" "&E5&" "&E4 pada Cell G2. Hasilnya adalah tujuh ratus lima puluh tiga rupiah dalam huruf kecil. 

Jika ingin seperti ini Tujuh Ratus Lima Puluh Tiga Rupiah maka rumusnya ditambah dengan PROPER  menjadi =PROPER(E6&" "&E5&" "&E4), atau jika ingin huruf kapital semua maka ditambahkan dengan UPPER menjadi : =UPPER(E6&" "&E5&" "&E4), jika ingin hurup kecil semua tambahkan dengan LOWER didepan notasi rumus tersebut dan ini juga tergantung pada penulisan listing terjemahan pada sheet2 tadi. Tetapi sobat dapat mengaturnya dengan penambahan fungsi seperti tersebut diatas.

Lumayan panjang juga prosesnya, apalagi diuraikan fungsi VLOOKUPnya, waduh..., satu posting tak akan kelar 1 hari. Saya tidak janji, semoga pada posting berikutnya saya uraikan maksud dari notasi tersebut. Semoga dan semoga pula teman-teman yang membaca artikel ini mendapatkan manfaat.

Amiiin....

Terjemahan uang Microsoft Office 2007+

Download

Sumber: http://jempot2-office.blogspot.com