Mengembalikan Varian (Tanggal) untuk tahun, bulan, dan hari yang ditentukan.
Sintaks
DateSerial(tahun, bulan, hari)
Peringatan Pastikan argumen berada dalam rentang nilai yang benar. Argumen yang tidak valid dapat mengakibatkan hasil yang salah.
Sintaks fungsi DateSerial memiliki argumen berikut:
| Argumen | Deskripsi |
|---|---|
| tahun | Diperlukan. bilangan bulat. Angka antara 100 dan 9999, inklusif, atau ekspresi numerik. |
| bulan | Diperlukan. bilangan bulat. Ekpresi numerik apa pun. |
| hari | Diperlukan. bilangan bulat. Ekpresi numerik apa pun. |
Keterangan
Untuk menentukan tanggal, seperti 31 Desember 1991, rentang angka untuk setiap argumen DateSerial harus berada dalam rentang yang diterima untuk unit; yaitu, 1–31 untuk hari dan 1–12 untuk bulan. Namun, Anda juga dapat menentukan tanggal relatif untuk setiap argumen menggunakan ekspresi numerik apa pun yang mewakili beberapa jumlah hari, bulan, atau tahun sebelum atau sesudah tanggal tertentu.
Contoh berikut menggunakan ekspresi numerik, bukan angka tanggal absolut. Di sini fungsi DateSerial mengembalikan tanggal yang sehari sebelum hari pertama (1 - 1), dua bulan sebelum Agustus (8 - 2), 10 tahun sebelum 1990 (1990 - 10); dengan kata lain, 31 Mei 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Argumen tahun dua digit untuk tahun ditafsirkan berdasarkan pengaturan mesin yang ditentukan pengguna. Pengaturan defaultnya adalah nilai antara 0 dan 29, inklusif, ditafsirkan sebagai tahun 2000–2029. Nilai default antara 30 dan 99 ditafsirkan sebagai tahun 1930–1999. Untuk semua argumen tahun lainnya, gunakan tahun empat digit (misalnya, 1800).
Versi Windows yang lebih awal dari Windows 2000 menafsirkan dua digit tahun berdasarkan default yang dijelaskan di atas. Untuk memastikan fungsi mengembalikan nilai yang tepat, gunakan empat digit tahun.
Ketika ada argumen yang melebihi rentang yang diterima untuk argumen tersebut, argumen tersebut akan meningkat ke unit berikutnya yang lebih besar sesuai kebutuhan. Misalnya, jika Anda menetapkan 35 hari, ini dievaluasi sebagai satu bulan dan beberapa jumlah hari, tergantung di mana di tahun penerapannya. Jika ada argumen tunggal di luar rentang -32.768 hingga 32.767, kesalahan akan terjadi. Jika tanggal yang ditentukan oleh ketiga argumen berada di luar rentang tanggal yang dapat diterima, kesalahan akan terjadi.
Catatan
Untuk tahun,bulan, dan hari, jika pengaturan properti Calendar adalah Gregorian, nilai yang diberikan diasumsikan adalah Gregorian. Jika pengaturan properti Calendar adalah Hijri, nilai yang diberikan diasumsikan sebagai Hijriah.
Bagian tanggal yang dikembalikan berada dalam unit periode waktu kalender Visual Basic saat ini. Misalnya, jika kalender saat ini adalah Hijriah dan bagian tanggal yang akan dikembalikan adalah tahun, nilai tahun adalah tahun Hijriah. Untuk tahun argumen, nilai antara 0 dan 99, inklusif, ditafsirkan sebagai tahun 1400-1499. Untuk semua nilai tahun lainnya, gunakan tahun empat digit lengkap (misalnya, 1520).
Contoh kueri
| Ekspresi | Hasil |
|---|---|
| PILIH Dateserial(2018,12,13) SEBAGAI NewDate FROM ProductSales; | Mengembalikan "tanggal" untuk tahun, bulan, dan hari tertentu yang dimasukkan dalam argumen fungsi dan ditampilkan dalam kolom "NewDate". Hasil: "13/12/2018". |
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 menggunakan fungsi DateSerial untuk mengembalikan tanggal untuk tahun, bulan, dan hari yang ditentukan.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.