Hari Pasaran

Di Jawa dikenal adanya nama hari pasar yang terdiri dari Manis (Legi), Pahing, Pon, Wage dan Kliwon. Formula berikut dapat digunakan di Microsoft Excel untuk menentukan nama hari pasarnya berdasarkan input tanggal pada suatu cell dan berlaku untuk dua sistem tanggal yang berlaku pada MS Excel (1900 dan 1904).
Misalnya kita mempunyai input tanggal pada cell A1 dengan nilai “17/8/1945″, formula akan kita masukan pada cell A2:
=TEXT(A1;"DDDD") &" "& IF(DATEVALUE("1904/1/2")=1; IF(MOD(A1;5)=0;"Pahing"; IF(MOD(A1;5)=1;"Pon"; IF(MOD(A1;5)=2;"Wage"; IF(MOD(A1;5)=3;"Kliwon"; IF(MOD(A1;5)=4;"Manis";))))); IF(MOD(A1;5)=0;"Kliwon"; IF(MOD(A1;5)=1;"Manis"; IF(MOD(A1;5)=2;"Pahing"; IF(MOD(A1;5)=3;"Pon"; IF(MOD(A1;5)=4;"Wage";))))))
Maka hasil yang tertera pada cell A2 adalah “Jumat Manis”.
Untuk menentukan nama hari pasar dari hari ini, modifikasi formula di atas dengan mengganti A1 dengan TODAY(), sehingga menjadi:
=TEXT(TODAY();"DDDD") &" "& IF(DATEVALUE("1904/1/2")=1; IF(MOD(TODAY();5)=0;"Pahing"; IF(MOD(TODAY();5)=1;"Pon"; IF(MOD(TODAY();5)=2;"Wage"; IF(MOD(TODAY();5)=3;"Kliwon"; IF(MOD(TODAY();5)=4;"Manis";))))); IF(MOD(TODAY();5)=0;"Kliwon"; IF(MOD(TODAY();5)=1;"Manis"; IF(MOD(TODAY();5)=2;"Pahing"; IF(MOD(TODAY();5)=3;"Pon";IF(MOD(TODAY();5)=4;"Wage";))))))

Sumber : Maseko

Panda Plum

Phasellus facilisis convallis metus, ut imperdiet augue auctor nec. Duis at velit id augue lobortis porta. Sed varius, enim accumsan aliquam tincidunt, tortor urna vulputate quam, eget finibus urna est in augue.

Tidak ada komentar:

Posting Komentar