Cara belajar Compare Date and Time Macro Excel

rumuskomputer | February 12, 2015 | Excel Macro | No Comments

Rumue Excel kita kali ini memberikan beberapa contoh dan mengajarkan kamu untuk dapat Compare Dates and Times di dalam excel VBA. Dates and Time atau tanggal dan waktu didalam excel disimpan dalam bentuk angka dan dihitung sebagai angka sejak tanggal 0 bulan Januari dan tahun 1900. Apa yang akan Anda lihat adalah berdasarkan dengan format angka yang Anda gunakan.

Masukkanlah beberapa angka di dalam kolom A

Angka yang dimasukkan di atas adalah tanggal. inputan diatas dapat merupakan salah satu cara untuk memasukkan beberapa angka tanggal tanpa harus khawatir mengenai format yang akan digunakan untuk tanggalnya. Dan Kemudian klik kanan pada bagian header kolom A, dan kemudian Format Cells dan kemudian pilihlan di bagian tanggal .

Tanggal diatas adalah dalam bentuk format US Format dan merupakan langkah untuk Format Cells menjadi Date yang mendasar. Dan tipe format ini tergantung sesuai settingan windows.

Tekanlah command button di worksheet dan tambahlah kode yang ada tertera di bawah:

Deklarasikan Variabel I sebagai Integer.

Dim I As integer

Tambah for untuk loop berikutnya

For I = 1 To 5

Next i

Fungsi date akan mengubah semua format di tanggalnya dan yang waktunya tidak ikut. Tambah beberapa kode dibawah ini ke dalam loop.

If Cells(I, 1) . Value = Date Then Cells (I, 1) . Font.Color = vbRed

Hasilnya akan tampak sebagai berikut:

Tambah code ini di loop yang tersedia

If Cells (I, 1) . Value < DateValue (“April 19, 2011”) Then Cells (I, 1) . Font.Color = vbRed

Hasilnya:

Dan bagaimana dengan Time atau waktu, Dan time adalah dalam bentuk decimal. Buat balek ke format awalnya dan ubahlah format yang ada di numbers ke bentuk angka decimal.