Re: ]] XL-mania [[ Konversi Nilai menjadi Kata-Kata seperti di Rapor 'Anak Sekolah'

 

betul mas zain,

ini juga sudah siti kemukaan di saat diajukan permintaan (di milis sebelah).

siti bilang pengucapan spt itu "tidak mengikuti bhs indonesia baku"; 

tetapi sang Thread-Maker-nya malah  ngambeg...(tidak muncul lagi)

untuk keperluan seperti itu, juga beberapa hari sebelumnya sudah di jawab

dengan FORMULA 999_99    (dengan pengucapan spt yg mas zain maksudkan)

tanpa makro hanya dibantu Define Name  (1 name: N berisi array pengucapan 

"satu" sampai "sembilan"

megaformulanya (terakhir diperbaiki 21 april 2011) seperti  di bawah ini

di lepas lagi di sini barangkali para bapak / ibu guru / TU bekenan memakainya

mumpung lagi musim durian .. eh musin ujian : slta sltp

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

formula ini panjangnya (jika ditulis di cell dengan nama kolom 1 huruf & nama baris 1 digit 

' = sekitar 823 karakter;  belum mencapai max 1024

sebetulnya dengan rumus dari mas zain dulu itu sudah terselesaikan, tetapi karena define name

mengharuskan penulisan terjemahan angka harus di CELL YG ARAH & JARAKNYA TERTENTU

dari sumber data (bilangan) nya, maka masih banyak pemakai yg bertanya-tanya

UDF dan Formula di atas diperuntukkan bagi yg sulit memahami define name (name berisi formula)

yg cara pembuatan dan pemakaiannnya tidak semua user mau bersusah payah memahaminya

padahal banyak juga keunggulannya.

tks

siti

note  

UDF maupun formula yg dibicarakan di threads ini dapat diunduh langsung di

http://www.box.net/shared/43dkx9ai46     

(ex modifikasi 23/apr/2011)

2011/4/23 zainul ulum [yahoo] <zainul_ulum@yahoo.com>

Kalo nggak salah pengucapan angka di belakang koma yang benar missal untuk 40.27 adalah

Empat puluh koma dua tujuh

Bukan

Empat puluh koma dua puluh tujuh.

 

Karena angka 2 di angka tersebut bukan puluhan, tetapi seper-puluhan dan  angka 7 adalah seper-seratusan.

Tolong koreksi, jika salah ya…..

 

From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com] On Behalf Of STDEV(i)
Sent: Friday, April 22, 2011 11:39 AM
To: XL-mania

Subject: ]] XL-mania [[ Konversi Nilai menjadi Kata-Kata seperti di Rapor 'Anak Sekolah'

Ysh & Yss para Bapak / Ibu Guru / TU di Sekolah-Sekolah, di Indonesia..

Dlm rangka merayakan Hari Kartini (wah.. sudah lewat sehari ya..)...
barangkali Anda memerlukan Fungsi di Excel Anda untuk menterjemahkan Nilai 
menjadi Kata-Kata dengan contoh pengucapan seperti ini

 

Nilai	Pengucapan Nilai
40.27	Empat Puluh Koma Dua Puluh Tujuh
79.94	Tujuh Puluh Sembilan Koma Sembilan Puluh Empat
75.70	Tujuh Puluh Lima Koma Tujuh Puluh
84.01	Delapan Puluh Empat Koma Nol Satu
84.10	Delapan Puluh Empat Koma Sepuluh
4.93	Empat Koma Sembilan Puluh Tiga
23.40	Dua Puluh Tiga Koma Empat Puluh
10.27	Sepuluh Koma Dua Puluh Tujuh
79.00	Tujuh Puluh Sembilan Koma Nol Nol
0.89	Nol  Koma Delapan Puluh Sembilan
43.70	Empat Puluh Tiga Koma Tujuh Puluh
26.76	Dua Puluh Enam Koma Tujuh Puluh Enam
59.00	Lima Puluh Sembilan Koma Nol Nol
14.98	Empat Belas Koma Sembilan Puluh Delapan

 

dan belum sempat membuat sendiri UDF nya...

 

Anda dapat mengunduh file bernama ctv_UDF_Terbilang_Nilai_Rapor_Cah_Sekolah.xls

di sini : http://www.box.net/shared/43dkx9ai46

 

syarat: tanpa syarat, 

boleh di-obok-obok, boleh dipakai, boleh tidak dipakai, boleh dihapus, boleh dibuang..

bulih - bulih - bulih ..

 

wassalam,

~siti~

 

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (3)

Recent Activity:

• New Members 85

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| wooHoooOoooo!!! "mengapa boss benci chart anda" mau dicetak lagi! |
| insanbiasa : "member 17,000++ yang beli buku mengapa boss benci   |
| chart anda cuma segituhh? pokoknya� yang nggak beli: BANNED :D :D |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

.

__,_._,___