Sambil menunggu kiriman perbaikan FILE dari Ibu Llily.......

"Terbilang" memang sudah merupakan masalah khusus tetapi ordo bilangan yg
akan di terjemahkan
sampai seberapa besarnya?
Apakah hanya ordo Puluhan / Sampai max 9,99, atau ordo Ratusan dengan dua
digit percahan 999,99
(cukup untuk menTERBILANGKAN)  nilai raport ?
Atau-kah sampai ordo TRILYUNAN ( 999 999 999 999 )  tanpa nilai pecahan ??

Di sinilah perlunya pertanyaan yg agak detil perlu dicantumkan di badan
email.
Jika lampiran ternyata gagal sampai ke tangan pembaca, members lain masih
bisa membantu
dengan mudah (kareana sudah ada masalah yg spesifik).


Berikut ini kita hanya saya menebak saja, barangkali Bu Lily seorang guru
atau bekerja pada suatu
lembaga pendidikan, dan rumus yg ditanyakan *KHUSUS adalah untuk
men-Terbilang-kan *
*nilai Raport  **rentang nilai (0.00 sampai 999,99)*;
Kami tetap menunggu lampiran yg sudah dirngkas.

Jika memang seperti itu masalahnya;  ibu Lily dapat membaca kasus serupa di
WEB MILIS kita ini
(ex pertanyaan pak Markus (belakangan mengUbah NickNamenya menjadi Indra
Patmoko),  sekitar
13 Desember 2011.
http://tech.groups.yahoo.com/group/belajar-excel/message/14624
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Mengolah-data-nilai-Raport-dan-Mencetak-dengan-Macro-td5070041.html

- Ada dua hal yg Ibu Lily harus lakukan

*1. *
*Membuat NAME (Define Name) terhadap sebuah formula.*
Pada Excel 2003: Klik menu Insert > Name > DEFINE
Pada Excel 2007: Tab Formula > Define Name ( atau melalui Name Manager)
[image: Array N.PNG]
Text yg dilingkari garis merah itu hasil ketikan manual kita.

*2. *
*Membuat Rumusnya*:
Kira kira seperti ini   (ini contoh untuk menterjemahkan bilangan yg
ada di*cell G25
*)

=IF(--INT(G25)=0,"Nol ",IF(--(LEFT(TEXT(INT(G25),"000")))=1,"Seratus ",
IF(--(LEFT(TEXT(INT(G25),"000")))>1,INDEX(N,--(LEFT(TEXT(INT(G25),"000"))))&"Ratus
","")))&
IF(--(MID(TEXT(INT(G25),"000"),2,1))=0,"",IF(--(MID(TEXT(INT(G25),"000"),2,1))=1,
CHOOSE((--(RIGHT(TEXT(INT(G25),"0")))=0)*1+((--(RIGHT(TEXT(INT(G25),"0")))=1)*2)+
((--(RIGHT(TEXT(INT(G25),"0")))>1)*3),"Sepuluh ","Sebelas
",INDEX(N,--(RIGHT(TEXT(INT(G25),"0"))))&"Belas "),
IF(--(MID(TEXT(INT(G25),"000"),2,1))>1,INDEX(N,--(MID(TEXT(INT(G25),"000"),2,1)))&"Puluh
")))&
IF(OR(--(MID(TEXT(INT(G25),"000"),2,1))=1,--(RIGHT(TEXT(INT(G25),"0")))=0),"",
INDEX(N,--(RIGHT(TEXT(INT(G25),"0")))))&"Koma
"&IF(--LEFT(TEXT(MOD(G25,1)*100,"00"))=0,"Nol ",
INDEX(N,LEFT(TEXT(MOD(G25,1)*100,"00"))))&IF(--RIGHT(TEXT(MOD(G25,1)*100,"00"))=0,"Nol
",
INDEX(N,RIGHT(TEXT(MOD(G25,1)*100,"00"))))

Jika ternyata kasus Ibu Lili Bilangannya misal ada di *cell D13*, ...
<> copylah text rumus di atas
<> aktifkan / nuka sheet kosong
<> select/ klik cell * H25*, >> klik pada* Formula Ba*r lalu Paste-kan
(Ctrl+V) text rumus ke formula bar,
     tekan enter.
<> copy CELL H25  ke CELL  E13
maka rumusnya sudah sesuai untuk menterjemahkan data bilangan (nilai) di D13

Contoh File dapat ibu unduh sendiri, alamatnya dapat diketahui jika sudah
membaca posting yang
link nya diberikan di atas.

Mudah-mudahan ada gunanya...
to all of bapak/ibu guru... i love you full ...!

iHaps.


2011/12/16 Lily Sari <lily_am...@yahoo.co.id>

> **
>
> Mohon bantuannya, Bagaimana cara membuat rumus terbilang pada file
> terlampir ?
> salam....
>
> --- Mod ---
> File attachment lebih dari 250KB, jadi tersortir.
> Mohon Bu Lily Sari mengirim ulang file attachment yang sudah dikecilkan
> size-nya hingga <250KB. Bisa dengan memotong data seperlunya (bukan semua
> data kerja), atau di-zip.
>
> Mohon untuk disempatkan membaca peraturan milis. Dibaca dengan tartil akan
> lebih baik. ;)
> -----------
>
>

<<Array N.PNG>>

Kirim email ke