Excel VBA Macro, Using Date and Time, DateAdd

Tutorial Excel VBA belajar menggunakan Date and Time

Melalui module di VBE ketik script berikut

Code:

'Deklarasi variable Date dengan Dim
Dim exampleDate As Date 



'Variable diisi dengan function untuk mengambil nilai dari data tgl
exampleDate = DateValue("Jun 19, 2010")

'Test dengan melihat hasilnya di Msgbox
MsgBox Year(exampleDate)


Note: Gunakan Month dan Day untuk ambil nilai bulan dan hrii

DateAdd

Digunakan untuk mendapatkan perpanjangan hari dari tanggal yang ditentukan

Code:
'deklarasi variable
Dim firstDate As Date, secondDate As Date'Isi variable
firstDate = DateValue("Jun 19, 2010")
secondDate = DateAdd("d", 3, firstDate)'test dengan msgbox
MsgBox secondDate


Note: Ganti d" ke  "m" untuk perpanjangan bulan dari tanggal ditentukan

current date and time, gunakan Now function.

Code:
MsgBox Now



Current Date Time
Hour, Minute, Second

Mendapatkan Jam(Hour), Gunakan Hour function.

Code:
MsgBox Hour(Now)

Time value untuk convert string ke Jam

Code:

MsgBox TimeValue("9:20:01 am")


TimeValue


Dim y As Double
y = TimeValue("09:20:01")
MsgBox y