Rumus terbilang otomatis di MS excel semua versi

Rumus terbilang otomatis di MS excel semua versi

selamat jumpa kawan hafainformasi.blogspot.co.id hari ini saya akan share cara membuat rumus terbilang otomatis untuk all versi excel, kenapa saya sebut rumus terbilang semua versi, karena semua versi excel bisa digunakan kawan heheheee bercanda.

Rumus terbilang saya rasa sangatlah penting untuk diulas dan di pahami oleh kawan-kawan semua terutama untuk pekerja kantoran atu kawan-kawan yang berkecimpung di dunia accounting pastinya.

Nah dimanakah biasanya rumus terbilang di gunakan dan apa manfaatnya, biasanya data tersebut digunakan pada excel, kwitansi atau dokumen-dokumen yang ada total nominalnya. Sedang apa manfaatnya ? manfaatnya jelas.. kawan tidak harus bersusah payah mengetik terbilang satu persatu.. ndak terbayangkan kawan misal data kawan banyak puluhan bahkan hingga ratusan tentunya capek-capeeekkkk banget... hehehehe....

Berukut rumus-rumus excel yang di gunakan :

1. IF
2. LEN
3. LEFT
4. MID
5. & (digunakan untuk penggabungan rumus)
6. OR
7. AND
8. PROPPER (untuk membuat huruf kapital pada setiap awal kata)
9. CONCATENATE (sebenarnya fungsinya Sama dengan fungsi “&”)

1OK kawan itulah rumus-rumus yang akan digunakan untuk membuat tulisan terbilang, untuk penjelasan rumus excel kapan-kapan kalau ada kesempatan akan saya jelaskan pada artikel berikutnya.

Biar gagh kelamaan langsung saja kawan berikut cara buat rumusnya :

1.    Buat tabel pada sel A2 s.d C3 dan ketikkan tulisan seperti contoh capture berikut

2.    Selanjutnya buat tabel pada sel E2 s.d F12 dan ketikkan seperti tulisan pada capture berikut, oh iya saat menulis angka tambah tanda petik ya misal ‘1, ‘2, ‘3 dst....

3.    Selanjutnya buat tabel pada sel H1 s.d J13 dan ketikkan tulisan seperti pada capture berikut :

4.    Selanjutnya isikan rumus berikut pada sel I2 s.d I13

Urutan Ke	Nominal
1	=IF(LEN($C$3)=12;LEFT($C$3;1);"")
2	=IF(LEN($C$3)=12;MID($C$3;2;1);IF(LEN($C$3)=11;LEFT($C$3;1);""))
3	=IF(LEN($C$3)=12;MID($C$3;3;1);IF(LEN($C$3)=11;MID($C$3; 2;1);IF(LEN($C$3)=10;LEFT($C$3;1);"")))
4	=IF(LEN($C$3)=12;MID($C$3;4;1);IF(LEN($C$3)=11;MID($C$3; 3;1);IF(LEN($C$3)=10;MID($C$3;2;1);IF(LEN($C$3)=9;LEFT($C$3;1);""))))
5	=IF(LEN($C$3)=12;MID($C$3;5;1);IF(LEN($C$3)=11;MID($C$3; 4;1);IF(LEN($C$3)=10;MID($C$3;3;1);IF(LEN($C$3)=9;MID($C$3; 2;1);IF(LEN($C$3)=8;LEFT($C$3;1);"")))))
6	=IF(LEN($C$3)=12;MID($C$3;6;1);IF(LEN($C$3)=11;MID($C$3; 5;1);IF(LEN($C$3)=10;MID($C$3;4;1);IF(LEN($C$3)=9;MID($C$3; 3;1);IF(LEN($C$3)=8;MID($C$3;2;1);IF(LEN($C$3)=7;LEFT($C$3;1);""))))))
7	=IF(LEN($C$3)=12;MID($C$3;7;1);IF(LEN($C$3)=11;MID($C$3; 6;1);IF(LEN($C$3)=10;MID($C$3;5;1);IF(LEN($C$3)=9;MID($C$3; 4;1);IF(LEN($C$3)=8;MID($C$3;3;1);IF(LEN($C$3)=7;MID($C$3; 2;1);IF(LEN($C$3)=6;LEFT($C$3;1);"")))))))
8	=IF(LEN($C$3)=12;MID($C$3;8;1);IF(LEN($C$3)=11;MID($C$3; 7;1);IF(LEN($C$3)=10;MID($C$3;6;1);IF(LEN($C$3)=9;MID($C$3; 5;1);IF(LEN($C$3)=8;MID($C$3;4;1);IF(LEN($C$3)=7;MID($C$3; 3;1);IF(LEN($C$3)=6;MID($C$3;2;1);IF(LEN($C$3)=5;LEFT($C$3;1);""))))))))
9	=IF(LEN($C$3)=12;MID($C$3;9;1);IF(LEN($C$3)=11;MID($C$3; 8;1);IF(LEN($C$3)=10;MID($C$3;7;1);IF(LEN($C$3)=9;MID($C$3; 6;1);IF(LEN($C$3)=8;MID($C$3;5;1);IF(LEN($C$3)=7;MID($C$3; 4;1);IF(LEN($C$3)=6;MID($C$3;3;1);IF(LEN($C$3)=5;MID($C$3; 2;1);IF(LEN($C$3)=4;LEFT($C$3;1);"")))))))))
10	=IF(LEN($C$3)=12;MID($C$3;10;1);IF(LEN($C$3)=11;MID($C$3; 9;1);IF(LEN($C$3)=10;MID($C$3;8;1);IF(LEN($C$3)=9;MID($C$3; 7;1);IF(LEN($C$3)=8;MID($C$3;6;1);IF(LEN($C$3)=7;MID($C$3; 5;1);IF(LEN($C$3)=6;MID($C$3;4;1);IF(LEN($C$3)=5;MID($C$3; 3;1);IF(LEN($C$3)=4;MID($C$3;2;1);IF(LEN($C$3)=3;LEFT($C$3; 1);""))))))))))
11	=IF(LEN($C$3)=12;MID($C$3;11;1);IF(LEN($C$3)=11;MID($C$3;10;1); IF(LEN($C$3)=10;MID($C$3;9;1);IF(LEN($C$3)=9;MID($C$3; 8;1);IF(LEN($C$3)=8;MID($C$3;7;1);IF(LEN($C$3)=7;MID($C$3; 6;1);IF(LEN($C$3)=6;MID($C$3;5;1);IF(LEN($C$3)=5;MID($C$3; 4;1);IF(LEN($C$3)=4;MID($C$3;3;1);IF(LEN($C$3)=3;MID($C$3; 2;1);IF(LEN($C$3)=2;LEFT($C$3;1);"")))))))))))
12	=IF(LEN($C$3)=12;MID($C$3;12;1);IF(LEN($C$3)=11;MID($C$3;11;1); IF(LEN($C$3)=10;MID($C$3;10;1);IF(LEN($C$3)=9;MID($C$3; 9;1);IF(LEN($C$3)=8;MID($C$3;8;1);IF(LEN($C$3)=7;MID($C$3; 7;1);IF(LEN($C$3)=6;MID($C$3;6;1);IF(LEN($C$3)=5;MID($C$3; 5;1);IF(LEN($C$3)=4;MID($C$3;4;1);IF(LEN($C$3)=3;MID($C$3; 3;1);IF(LEN($C$3)=2;MID($C$3;2;1);IF(LEN($C$3)=1;LEFT($C$3; 1);""))))))))))))

5.    Selanjutnya isikan rumus berikut pada sel J2 s.d J13

Urutan Ke	Terbilang
1	=IF(I2="";"";VLOOKUP(I2;$E$3:$F$12;2;FALSE))
2	=IF(I3="";"";VLOOKUP(I3;$E$3:$F$12;2;FALSE))
3	=IF(I4="";"";VLOOKUP(I4;$E$3:$F$12;2;FALSE))
4	=IF(I5="";"";VLOOKUP(I5;$E$3:$F$12;2;FALSE))
5	=IF(I6="";"";VLOOKUP(I6;$E$3:$F$12;2;FALSE))
6	=IF(I7="";"";VLOOKUP(I7;$E$3:$F$12;2;FALSE))
7	=IF(I8="";"";VLOOKUP(I8;$E$3:$F$12;2;FALSE))
8	=IF(I9="";"";VLOOKUP(I9;$E$3:$F$12;2;FALSE))
9	=IF(I10="";"";VLOOKUP(I10;$E$3:$F$12;2;FALSE))
10	=IF(I11="";"";VLOOKUP(I11;$E$3:$F$12;2;FALSE))
11	=IF(I12="";"";VLOOKUP(I12;$E$3:$F$12;2;FALSE))
12	=IF(I13="";"";VLOOKUP(I13;$E$3:$F$12;2;FALSE))

6.    Selanjutnya buat tabel pada sel L1 s.d L13 dan ketikkan tulisan seperti pada capture berikut :

7.    Selanjutnya isikan rumus berikut pada sel L2 s.d L13

Terbilang

=IF(J2="";"";IF(J2="Satu";"Seratus ";J2&" Ratus "))

=IF(J3="Satu";"";IF(OR(J3="Nol";J3="");"";IF(J4="Nol";J3&" puluh Miliyar ";J3&" puluh ")))

=IF(AND(J3="Nol";J4="Nol");" Miliyar ";IF(AND(J3="Satu";J4="Nol");"Sepuluh Miliyar  ";IF(AND(J3="Satu";J4="Satu");"Sebelas Miliyar ";IF(J3="Satu";J4&" belas Miliyar  ";IF(OR(J4="Nol";J4="");"";J4&" Miliyar ")))))

=IF(J5="Nol";"";IF(J5="";"";IF(J5="Satu";"Seratus ";J5&" Ratus ")))

=IF(J6="Satu";"";IF(OR(J6="Nol";J6="");"";IF(J7="Nol";J6&" puluh juta ";J6&" puluh ")))

=IF(AND(J6="Nol";J7="Nol");" juta ";IF(AND(J6="Satu";J7="Nol");"Sepuluh juta  ";IF(AND(J6="Satu";J7="Satu");"Sebelas juta ";IF(J6="Satu";J7&"belas juta ";IF(OR(J7="Nol"; J7="");"";J7&" juta ")))))

=IF(J8="Nol";"";IF(J8="";"";IF(J8="Satu";"Seratus ";J8&" Ratus ")))

=IF(J9="Satu";"";IF(OR(J9="Nol";J9="");"";IF(J10="Nol";J9&" puluh ribu ";J9&" puluh ")))

=IF(AND(J9="Nol";J10="Nol");" ribu ";IF(AND(J9="Satu";J10="Nol");"Sepuluh ribu  ";IF(AND(J9="Satu";J10="Satu");"Sebelas ribu ";IF(J9="Satu";J10&" belas ribu  ";IF(OR(J10="Nol";J10="");"";J10&" ribu ")))))

=IF(J11="Nol";"";IF(J11="";"";IF(J11="Satu";"Seratus ";J11&" Ratus ")))

=IF(J12="Satu";"";IF(OR(J12="Nol";J12="");"";J12&" puluh "))

=IF(AND(J12="Satu";J13="Nol");"Sepuluh ";IF(AND(J12="Satu";J13="Satu");"Sebelas  ";IF(J12="Satu";J13&"belas ";IF(OR(J13="Nol";J13="");"";J13))))

Pada dasarnya rumus perwarna sama tinggal copy kan rumus di warna pertama ke warna ke dua, cuman satuannya yang berbeda misal warna pertama satuannya miliyar maka warna kedua satuannya Juta tinggal disesuaikan saja.

8.    Setelah rumus-rumus sudah di letakkan pada tabelnya masing-masing ketikkan rumus berikut pada sel A5 :

=PROPER(CONCATENATE("Terbilang : ";L2;L3;L4;L5;L6;L7;L8;L9;L10;L11;L12;L13;"Rupiah"))

Ok kawan selesai sudah pembahasan cara membuat Rumus terbilang otomatis di MS excel semua versi dari saya semoga bermanfaat dan tidak kesulitan ya hehehe...

untuk yang masih kesulitan atau binggung bisa download file excel yang sudah saya buatkan pada link download di bawah kawan.

boleh juga bertannya melalui kolom komentar di bawah atau kirim email, kawan juga boleh mencopy untuk artikel kawan pastinya jangn lupa menyertakan sumbernya ya.. serta kasih link ke blog saya ini hehehehe..... dan  pastinya bantu share blog saya ya kawan hafainformasi.blogspot.co.id agardapat membantu teman-teman yang lain yang pastinya agar bermanfaat Ammmiiiinnnn...

salam sejahtera kawan semuanya sekian dulu sampai jumpa lagi.