Mencari Nama Hari Pasar

August 30, 2005 by maseko

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";))))))

Category Posted in MS Office

Tulisan lain yang mungkin terkait dengan tulisan di atas:

20 Responses to “Mencari Nama Hari Pasar”

dhika said on September 2, 2005, 3:17 am:

Wah, maseko bgs nih

Indra said on August 11, 2006, 2:25 pm:

aku udah masukin formulanya terus diapain…?? krn hasilnya nggak keluar

maseko said on August 11, 2006, 3:56 pm:

Indra, apakah sudah disesuaikan dengan cell yang akan dicari hari pasarnya? Pada contoh pertama itu khusus untuk menghitung cell A1, sedang pada contoh kedua untuk tanggal hari ini (tanpa cell referensi).

Harpa said on October 8, 2006, 1:44 pm:

Aku pakai xl 2002
a1 diisi tanggal, a2 diisi rumus pertama.

betulkah ?
kok ndak ada apa-apa ?

maseko said on October 18, 2006, 4:18 pm:

Harpa, seharusnya tidak ada masalah. Oya, pastikan setting regional yang digunakan adalah Indonesia.

wiwid said on March 6, 2008, 5:30 am:

salam kenal
wiwid, surabaya
thx

Uji' said on March 17, 2008, 9:59 am:

Bagus dan terima kasih juga untuk tips-tips yang lainnya.

Dhani said on April 4, 2008, 2:07 pm:

Aku ada masalah nich!!!!
Formula dalam program excel 2003 gak mau jalan otomatis alias macet, jadi perlu double klik dalam cell tersebut baru bisa mengeluarkan hasil menurut formula yang diinput dalam cell tersebut. Gimana cara mengatasinya??? Tolongin dong!!!!!

maseko said on April 4, 2008, 2:26 pm:

#8
Coba pilih Tools — Options..
Pada Tab Calculation pilih Automatic kemudian OK. Semoga memang karena itu masalahnya.

#10

Ndorodwi said on April 23, 2008, 4:32 pm:

Salam Kenal
Utk temen2 yg gak bisa memunculkan hasil dari rumus Maseko. Bisa jadi regional settingnya bukan Indonesia. Kl iya, tinggal di ctrl+h aja…trus ganti ; dengan ,