12 Agustus 2013

Membuat Akhiran Untuk Angka dan Tanggal

Pernah membaca tulisan angka seperti ini? 1st, 2nd atau 3rd atau di bahasakan menjadi yang pertama, kedua dan ketiga. Dalam bahasa inggris 1st, 2nd dan 3rd adalah Ordinal Suffixes atau akhiran yang menandakan suatu urutan. Misal "Anna seated in 1st (dibaca "first") class" atau "Anna is the 2nd (dibaca "second") born". Nah saya ingin membahas tentang ini, dengan Excell tentunya. Bagaimana menambahkan akhiran urutan ini pada sebuah angka dan tanggal.

Hasil yang diinginkan seperti ini:












Rumus yang bisa diterapkan seperti ini:

=A2&""&MID("thstndrdthstndrdth";MATCH(IF(MOD(A2;100)>29;MOD(A2;10)+20;MOD(A2;100));{0;1;2;3;4;21;22;23;24};1)*2-1;2)

atau

=A2&MID("thstndrdth";MIN(9;2*RIGHT(A2)*(MOD(A2-11;100)>2)

atau

=A2&IF(OR(MOD(A2;100)={11\12\13});"th";LOOKUP(--RIGHT(A2);{0\"th";1\"st";2\"nd";3\"rd";4\"th"}))

atau

=A28&IF(AND(A2>=10;A2<=14);"th";CHOOSE(MOD(A2;10)+1;"th";"st";"nd";"rd";"th";"th";"th";"th";"th";"th"))


Contoh berikut adalah penambahan akhiran untuk Tanggal:









Rumus yang dapat diaplikasikan:
=DAY(A1)&IF(OR(DAY(A1)={1;2;3;21;22;23;31});CHOOSE(1*RIGHT(DAY(A1)*0,1);"st";"nd";"rd ");"th")&TEXT(A1;" mmmm, yyyy")

atau

=DAY(A3)&IF(INT(MOD(DAY(A3);100)/10)=1;"th"; IF(MOD(DAY(A3);10)=1;"st";IF(MOD(DAY(A3);10)=2;"nd";IF(MOD(DAY(A3);10)=3;"rd";"th"))))& " day of " & TEXT(A3;"mmmm yyyy")

atau

= TEXT(A5;"mmmm d")&LOOKUP(DAY(A5);{1\2\3\4\21\22\23\24\31;"st"\"nd"\"rd"\"th"\"st"\"nd"\"rd"\"th"\"st"})&", "&YEAR(TODAY())

atau

=TEXT(A7;"mmmm") & " " & DAY(A7) &MID("thstndrdth";MIN(9;2*RIGHT(DAY(A7))*(MOD(DAY(A7)-11;100)>2)+1);2) & ", " & YEAR(A7)

Tidak ada komentar:

Posting Komentar