Mengembalikan Varian (Bilangan Bulat) yang berisi bagian tertentu dari tanggal yang ditetapkan.
| Peringatan Ada masalah dengan penggunaan fungsi ini. Senin terakhir dalam beberapa tahun kalender dapat dikembalikan sebagai minggu ke-53 ketika seharusnya minggu 1. Untuk informasi selengkapnya dan solusi sementara, lihat Fungsi Format atau DatePart dapat mengembalikan nomor minggu yang salah untuk Senin terakhir dalam Tahun. |
|---|
Sintaks
DatePart(interval, date [, firstdayofweek] [, firstweekofyear] )
Sintaks fungsi DatePart memiliki argumen berikut:
| Argumen | Deskripsi |
|---|---|
| interval | Diperlukan. Ekspresi string yang merupakan interval waktu yang ingin Anda kembalikan. |
| tanggal | Diperlukan. Nilai varian (Tanggal) yang ingin Anda evaluasi. |
| firstdayofweek | Opsional. Konstanta yang menentukan hari pertama dalam seminggu. Jika tidak ditentukan, Minggu dianggap sebagai hari pertama dalam seminggu. |
| firstdayofyear | Opsional. Konstanta yang menentukan minggu pertama dalam setahun. Jika tidak ditentukan, minggu pertama diasumsikan sebagai minggu munculnya tanggal 1 Januari. |
Pengaturan
Argumen interval memiliki pengaturan berikut:
| Pengaturan | Deskripsi |
|---|---|
| yyyy | Tahun |
| q | Kuartal |
| m | Bulan |
| y | Hari dalam setahun |
| d | Hari |
| w | Hari kerja |
| ww | Minggu |
| h | Jam |
| n | Menit |
| s | Detik |
Argumen firstdayofweek memiliki pengaturan berikut:
| Konstanta | Value | Deskripsi |
|---|---|---|
| vbUseSystem | 0 | Gunakan pengaturan NLS API. |
| vbSunday | 1 | Minggu (default) |
| vbMonday | 2 | Senin |
| vbSelasa | 3 | Selasa |
| vbWednesday | 4 | Rabu |
| vbKamis | 5 | Kamis |
| vbFriday | 6 | Jumat |
| vbSaturday | 7 | Sabtu |
Argumen firstweekofyear memiliki pengaturan berikut:
| Konstanta | Value | Deskripsi |
|---|---|---|
| vbUseSystem | 0 | Gunakan pengaturan NLS API. |
| vbFirstJan1 | 1 | Mulai dengan minggu di mana 1 Januari terjadi (default). |
| vbFirstFourDays | 2 | Mulailah dengan minggu pertama yang memiliki setidaknya empat hari di tahun baru. |
| vbFirstFullWeek | 3 | Mulailah dengan minggu penuh pertama dalam setahun. |
Keterangan
Anda dapat menggunakan fungsi DatePart untuk mengevaluasi tanggal dan mengembalikan interval waktu tertentu. Misalnya, Anda dapat menggunakan DatePart untuk menghitung hari dalam seminggu atau jam saat ini.
Argumen firstdayofweek memengaruhi penghitungan yang menggunakan simbol interval "w" dan "ww".
Jika tanggal adalah tanggal literal, tahun yang ditentukan menjadi bagian permanen dari tanggal tersebut. Namun, jika tanggal diapit dalam tanda kutip ganda (" "), dan Anda menghilangkan tahun, tahun ini disisipkan ke dalam kode Anda setiap kali ekspresi tanggal dievaluasi. Ini memungkinkan untuk menulis kode yang dapat digunakan di tahun yang berbeda.
Catatan
Untuk tanggal, jika pengaturan properti Calendar adalah Gregorian, tanggal yang diberikan harus Gregorian. Jika kalendernya adalah Hijriah, tanggal yang diberikan haruslah Hijriah.
Bagian tanggal yang dikembalikan berada dalam unit periode waktu dari kalender Arab saat ini. Misalnya, jika kalender saat ini adalah Hijriah dan bagian tanggal yang akan dikembalikan adalah tahun, nilai tahun adalah tahun Hijriah.
Contoh kueri
| Ekspresi | Hasil |
|---|---|
| PILIH DatePart("yyyy",[DateofSale]) SEBAGAI NewDate FROM ProductSales; | Mengembalikan 'Tahun' dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("q",[DateofSale]) SEBAGAI NewDate DARI ProductSales; | Mengembalikan 'Kuartal' (berdasarkan tahun kalender) dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("y",[DateofSale]) SEBAGAI NewDate FROM ProductSales; | Mengembalikan 'Hari dalam Setahun' (1 hingga 365) dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("d",[DateofSale]) SEBAGAI NewDate DARI ProductSales; | Mengembalikan 'Hari' dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("w",[DateofSale]) SEBAGAI NewDate FROM ProductSales; | Mengembalikan 'Hari Kerja' (dari 1 sampai 7 di mana 1 mewakili hari Minggu) dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("ww",[DateofSale]) SEBAGAI NewDate FROM ProductSales; | Mengembalikan 'Nomor minggu' (dari 1 hingga 52) dari nilai tanggal bidang "DateofSale". |
| PILIH DatePart("h",[DateTime]) SEBAGAI NewDate DARI ProductSales; | Mengembalikan 'Jam' dari nilai tanggal bidang "DateTime". |
| PILIH DatePart("n",[DateTime]) SEBAGAI NewDate DARI ProductSales; | Mengembalikan 'Menit' dari nilai tanggal bidang "DateTime". |
| PILIH DatePart("s",[DateTime]) SEBAGAI NewDate FROM ProductSales; | Mengembalikan 'detik' dari nilai tanggal pada bidang "DateTime". |
Contoh VBA
Catatan
Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini mengambil tanggal dan, menggunakan fungsi DatePart , menampilkan kuartal dalam setahun terjadinya.
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg