kalau dari propertis formatnya ngga bisa ya pak

kalau di excelkan untuk tanggal indonesia lengkap sepeti ini [$-421]dd
mmmm yyyy;@


Pada tanggal 09/01/09, [email protected] <[email protected]> menulis:
> dan ini contoh fungsi bulan:
>
> =CHOOSE(MONTH(tanggal), "Januari", "Februari", "Maret", "April", "Mei",
> "Juni", "Juli", "Agustus", "September", "Oktober", "November", "Desember")
>
>
> "[email protected]" <[email protected]> wrote:
>       Mungkin bisa jadi alternatif untuk fungsi nama harinya spt ini:
> =Choose(Weekday([Tanggal]),"Minggu","Senin","Selasa","Rabu","Kamis","jum'at","Sabtu")
> ini saya coba pada control source textbox
>
> Salam
>
> Nurhasim
> Edy WIYONO <[email protected]> wrote:
>                           Gunakan Fungsi ini. Taruh di Module.function
> NamaHari(Tanggal)
>  ':::::::::::::::::::::::::::::::::::::::::::::::::::::
>  ' Mengambil nama hari
>  ':::::::::::::::::::::::::::::::::::::::::::::::::::::
>    select case  weekday(Tanggal)
>      case 1
>        NamaHari = "Minggu"
>      case 2
>        NamaHari = "Senin"
>      case 3
>        NamaHari = "Selasa"
>      case 4
>        NamaHari = "Rabu"
>      case 5
>        NamaHari = "Kamis"
>      case 6
>        NamaHari = "Jum'at"
>      case 7
>        NamaHari = "Sabtu"
>    end select
>  end function
>
>  function NamaBulan(Bulan)
>  ':::::::::::::::::::::::::::::::::::::::::::::::::::::
>  ' Mengambil nama bulan
>  ':::::::::::::::::::::::::::::::::::::::::::::::::::::
>    select case Bulan
>      case 1
>        NamaBulan = "Januari"
>      case 2
>        NamaBulan = "Februari"
>      case 3
>        NamaBulan = "Maret"
>      case 4
>        NamaBulan = "April"
>      case 5
>        NamaBulan = "Mei"
>      case 6
>        NamaBulan = "Juni"
>      case 7
>        NamaBulan = "Juli"
>      case 8
>        NamaBulan = "Agustus"
>       case 9
>        NamaBulan = "September"
>      case 10
>        NamaBulan = "Oktober"
>      case 11
>        NamaBulan = "Nopember"
>      case 12
>        NamaBulan = "Desember"
>    end select
>  end function
>  Tinggal dipanggil saja:NamaHari(now) & "," & day(now) &
>  NamaBulan(month(now)) & year(now) jadinya:Jumat, 9 Januari 2009Salam Hangat
>  dan Jabat Erat,Edy WIYONO> ----- Original Message -----
>  > From: "him mah" <[email protected]>
>  > To: <[email protected]>
>  > Sent: Thursday, January 08, 2009 22:12
>  > Subject: [belajar-access] Delete record all
>  >
>  >
>  >>
>  >> Terus kalau kita pingin format tanggal lengkap dalam bahasa indonesia
>  >> bagaimana, terutama bulannya
>  >>
>  >
>
>
>
>
>
>
>
>
>

Kirim email ke