cara bekerja dengan tanggal dan waktu di Excel VBA

Cara bekerja dengan tanggal dan waktu di Excel VBA

Cara bekerja dengan tanggal dan waktu di Excel VBA

Cara bekerja dengan tanggal dan waktu di Excel VBA . Tempatkan tombol perintah pada lembar kerja Anda dan tambahkan baris kode di bawah ini. Untuk menjalankan baris kode, klik tombol perintah pada lembar Excel.

Tahun, Bulan, Hari Tanggal

Makro berikut mendapatkan tahun dari sebuah tanggal.Ā Untuk mendeklarasikan tanggal, gunakan pernyataan Dim.Ā Untuk menginisialisasi tanggal, gunakan fungsi DateValue.

Kode:

dimĀ exampleDateĀ AsĀ Date

exampleDate = DateValue (“Jan 19, 2020”)

MsgBox Year (exampleDate)

Hasil:

Tahun Tanggal di Excel VBA

Catatan: Gunakan Bulan dan Hari untuk mendapatkan bulan dan hari dari suatu tanggal.

DateAdd

Untuk menambahkan jumlah hari ke tanggal, gunakan fungsi DateAdd.Ā Fungsi DateAdd memiliki tiga argumen.Ā Isi “d” untuk argumen pertama untuk menambahkan hari.Ā Isi 3 untuk argumen kedua untuk menambahkan 3 hari.Ā Argumen ketiga mewakili tanggal jumlah hari akan ditambahkan.

Kode:

dimĀ firstDateĀ AsĀ DateĀ , secondDateĀ AsĀ Date

firstDate = DateValue (“Jan 19, 2020”)
secondDate = DateAdd (“d”, 3, firstDate)

MsgBox secondDate

Hasil:

DateAdd

Catatan: Ubah “d” menjadi “m” untuk menambahkan beberapa bulan pada tanggal.Ā Tempatkan kursor Anda pada DateAdd di Editor Visual Basic dan klik F1 untuk bantuan pada penentu interval lainnya.Ā Tanggal dalam Format AS.Ā Bulan pertama, Hari kedua.Ā Jenis format ini tergantung pada pengaturan regional windows Anda.

Tanggal dan Waktu Saat Ini

Untuk mendapatkan tanggal dan waktu saat ini, gunakan fungsi Sekarang.

Kode:

MsgBox Now

Hasil:

Tanggal dan Waktu Saat Ini

Jam, Menit, Detik

Get the hour of a time, gunakan fungsi Hour.

Kode:

MsgBox Hour (Now)

Hasil:

Jam Waktu Saat Ini

Catatan: Gunakan Menit dan Detik untuk mendapatkan menit dan detik dari waktu.

Baca Juga  PENGENALAN COREL DRAW

Nilai waktu

Fungsi TimeValue mengubah string menjadi nomor seri waktu.Ā Nomor seri waktu adalah angka antara 0 dan 1. Misalnya, tengah hari (tengah hari) direpresentasikan sebagai 0,5.

Kode:

MsgBox TimeValue (“9:20:01 am”)

Hasil:

Nilai waktu

Sekarang, untuk melihat dengan jelas bahwa Excel menangani waktu secara internal sebagai angka antara 0 dan 1, tambahkan baris kode berikut:

DimĀ yĀ AsĀ Double
y = TimeValue (“09:20:01”)
MsgBox y

Hasil:

Nomor Seri Waktu

 

Tinggalkan Komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Need Help? Chat with us