VBA Sekarang

Excel VBA Sekarang Berfungsi

SEKARANG adalah fungsi tanggal dan waktu di kedua VBA yang digunakan untuk mendapatkan tanggal dan waktu sistem saat ini, sama seperti fungsi lembar kerja yang tidak mengambil argumen di dalamnya, di VBA sekarang fungsi juga tidak mengambil argumen apa pun, keluaran yang dikembalikan karena fungsi ini adalah tanggal.

Fungsi VBA NOW mirip dengan yang ada di fungsi lembar kerja excel. Seperti fungsi DATE di VBA "SEKARANG" juga tidak memiliki parameter untuk diteruskan, kita hanya perlu meneruskan fungsi dengan tanda kurung tertutup atau tidak perlu tanda kurung juga. Dengan menggunakan fungsi DATE di VBA kita dapat menghasilkan tanggal saat ini yang menunjukkan sistem yang sedang kita kerjakan. Namun, saya telah melihat situasi di mana kita membutuhkan waktu saat ini bersama dengan tanggalnya juga. Di excel kita dapat melakukan banyak hal, demikian pula kita dapat menghasilkan tanggal dan waktu saat ini dengan fungsi sederhana yang disebut SEKARANG di excel.

Rumus VBA SEKARANG sederhana.

SEKARANG ()

Contoh Fungsi SEKARANG di VBA Excel

Lihat contoh sederhana dari fungsi SEKARANG di VBA. Ikuti langkah-langkah di bawah ini untuk menulis kode VBA dan memiliki sedikit pengetahuan tentang SEKARANG serta menulis kode.

Langkah 1: Mulai subprocedure dengan memberikan nama makro.

Kode:

 Sub Sekarang_Contoh1 () End Sub

Langkah 2: Deklarasikan variabel sebagai "Tanggal". Alasan mengapa kita perlu mendeklarasikan variabel sebagai "Tanggal" karena hasil akhir kita dalam format Tanggal dan Waktu.

Kode:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tanggal Akhir Sub 

Langkah 3: Tetapkan nilai ke variabel "k" dengan menerapkan fungsi VBA NOW.

Kode:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tanggal k = Sekarang End Sub 

Langkah 4: Sekarang tunjukkan nilai fungsi SEKARANG yang telah kita tetapkan ke variabel "k" di kotak pesan di VBA.

Kode:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tanggal k = Sekarang MsgBox k Akhir Sub 

Ok, kita sudah selesai.

Jalankan kode tersebut menggunakan tombol F5 atau secara manual dan lihat apa hasilnya.

Hasilnya menunjukkan 15/4/2019 pukul 5:03:35.

Format tanggal komputer saya adalah "bb-hh-tttt".

Kami juga dapat mengubah format tanggal dengan menggunakan fungsi FORMAT. Di bawah ini adalah kode untuk mengubah format tanggal.

Kode:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tanggal k = Sekarang Format MsgBox (k, "DD-MMM-YYYY HH: MM: SS") End Sub 

Jalankan kodenya dan lihat perbedaannya.

Sekarang kami memiliki format tanggal dan waktu yang tepat. Dengan format ini, siapa pun dapat memahami format tanggal dan waktu.

Volatile di Alam:

Seperti yang Anda lihat pada contoh pertama kita mendapatkan hasil waktu sebagai 5:03:35 dan pada contoh kedua, kita mendapatkan hasil sebagai 17:19:02. Jadi ini menunjukkan bahwa fungsi NOW adalah fungsi volatil yang berubah setiap detik.

Alternatif untuk Fungsi Timer di VBA

Sebagai alternatif untuk VBA TIMER, kita dapat menggunakan fungsi "VBA NOW" untuk menghitung total waktu yang dibutuhkan oleh makro untuk menyelesaikan tugas.

Gunakan kode di bawah ini untuk menghitung waktu yang dibutuhkan oleh kode Anda.

C0de:

 Sub TotalDuration () Dim k As Date k = Now '' 'Masukkan kode Anda di sini' '' MsgBox "Total Waktu yang Diambil oleh makro untuk menyelesaikan tugas adalah:" & _ Format ((Sekarang - k), "HH: MM : SS ") End Sub 

Di area berwarna hijau salin dan tempel kode Anda.

Jalankan kode dengan menekan tombol F5 atau tekan tombol jalankan. Segera setelah itu menyelesaikan eksekusi, kami akan mendapatkan waktu yang dibutuhkan oleh makro untuk menyelesaikan pesan tugas di kotak pesan. Di bawah ini adalah contoh yang sama.

Seperti ini, kita dapat menggunakan fungsi SEKARANG dengan banyak cara di VBA.

Anda dapat mendownload template Fungsi Excel VBA Sekarang di sini - Template Fungsi VBA Now