Coba rumus terlampir.
Belum saya coba kalo setting regionalnya Indonesia.

Formula ini maksimal 999999999.99
Jadi selain untuk isi raport, juga bisa untuk kwitansi

From: [email protected] [mailto:[email protected]] On Behalf
Of Syamsul Abidin Ibnu Miftahuddin
Sent: Tuesday, December 04, 2012 2:25 PM
To: [email protected]
Subject: ]] XL-mania [[ Merubah Mega Formula ribuan

  
Mohon bantuannya pada teman-teman XL mania, gmn cara merubah mega formula
berikut (formula ini maksimal 999,99): 

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

Menjadi ribuan, misal 1.500,56 (Seribu lima ratus koma lima enam)
mohon bantuannya, untuk saya gunakan mengisi rapot.


Attachment: Terbilangv8.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet

Kirim email ke