Mencari Hari, Pasaran dan Neptu via Excel
15.Apr.2010 | By WongBagus | Category: Program | Reader: 1,359 |Sebuah obrolan di warung mracang sebelah rumah antara Minthi dengan Mbah Kardjo
“Mbah Kardjo, ponakan saya itu lahir tanggal 27 September 1978. Itu hari dan pasarannya apa ya?”
Lantas mbah Kardjo seperti berpikir, dinyalakannya rokok klobot. Lama tidak segera dijawab. Lalu kemudian ia tersenyum. Dari balik bajunya dia mengeluarkan PDA dan mulai menekan stylus di sana sini. Lalu ia menjawab, “Aha… itu anak lahir pada “RABU-KLIWON“. Lantas mbah Kardjo menyeruput kopi dan memasukkan kembali PDA-nya.
Sidang pembaca, ilustrasi diatas saya maksudkan bahwa kita bisa memanfaatkan program aplikasi Microsoft Excel, yang notabene adalah kinerja wong londo, untuk menghitung dan mencari nama hari dan pasaran Jawa, bahkan neptu.
Bagaimana caranya?
A. Mencari hari dan Pasaran (cara manual)
- Letakkan pointer di cell B1.. kemudian isikan tanggal yang dimaksud, misalkan seperti yang mbah Kardjo lakukan, ia memasukkan tanggal ‘27-09-1978 ‘
- Untuk mencari hari, masukkan pada cell tujuan (saya pilih B5) rumus berikut, :
-
=TEXT(WEEKDAY($B$1;1);"dddd")
-
- Untuk mencari hari, masukkan pada cell tujuan (saya pilih B6) rumus berikut:
-
=CHOOSE(MOD($B1;5)+1;"Kliwon";"Legi";"Pahing";"Pon";"Wage")
-
- Selesai
B. Mencari hari dan Pasaran dan Neptu (cara tabel)
- Buatlah isian sheet sedemikian rupa seperti gambar berikut (klik untuk memperbesar):
Sheet Neptu Pasaran
- Tabel hari pasaran (kolom G2.. K9) diberi nama tabel ‘tabel_jawa‘. Jika belum tahu caranya, sila di-blok kolomg G2 .. K9, kemudian tekan menu ‘Insert > Name > Define’ dan beri nama ‘tabel_jawa‘
- lalu pada kolom HARI (cell C12), isi dengan rumus:
-
=VLOOKUP(MOD($C$2;7)+1;tabel_jawa;2)
-
- kolom PASARAN (cell C13), isi dengan rumus:
-
=VLOOKUP(MOD($C$2;5)+1;tabel_jawa;3)
-
- dan kolom NEPTU (cell C13) isi dengan rumus:
-
=VLOOKUP(MOD($C2;7)+1;tabel_jawa;4)+VLOOKUP(MOD($C2;5)+1;tabel_jawa;5)
-
- selesai
Jika ndak mau repot, ya sudah, unduh saja file excel sederhana ini. Semoga bermanfaat.
Loading ...
Terima kasih banyak infonya.
Sepertinya ada juga aplikasi nya yg untuk Win XP ? kalau punya dan nggak keberatan saya minta link download nya dong.
Sekali lagi terima kasih banyak ya.
** te: aplikasi yang mana? kalau file excel yang bisa didownload diatas tidak tergantung OS, tetapi Excel 2003 pun sudah bisa **
Makasih mas buat ilmunya. pas lagi butuh kebetulan.
coba diperbaiki deh hasilnya masih salah tuch…..