VBA Sekarang (Panduan Langkah demi Langkah) | Bagaimana Menggunakan Fungsi Sekarang di Excel VBA?

Fungsi Excel VBA Sekarang

SEKARANG adalah fungsi tarikh dan waktu di kedua VBA yang digunakan untuk mendapatkan tarikh dan waktu sistem semasa, sama seperti fungsi lembaran kerja yang tidak mengambil argumen di dalamnya, dalam fungsi VBA sekarang juga tidak mengambil argumen, output kembali untuk fungsi ini adalah tarikh.

Fungsi VBA SEKARANG serupa dengan fungsi lembaran kerja excel. Seperti fungsi DATE di VBA "SEKARANG" juga tidak mempunyai parameter untuk diteruskan, kita hanya perlu meneruskan fungsi dengan kurungan tertutup atau tidak memerlukan tanda kurung juga. Dengan menggunakan fungsi DATE di VBA kita dapat menghasilkan tarikh semasa seperti menunjukkan sistem yang sedang kita jalankan. Namun, saya telah melihat situasi di mana kita memerlukan masa semasa dan tarikhnya juga. Dalam excel kita dapat melakukan banyak jenis hal, sama, kita dapat menghasilkan tarikh dan waktu semasa dengan fungsi sederhana yang disebut SEKARANG di excel.

Formula VBA SEKARANG adalah mudah.

SEKARANG ()

Contoh Fungsi SEKARANG dalam VBA Excel

Lihat contoh ringkas fungsi SEKARANG di VBA. Ikuti langkah-langkah di bawah untuk menulis kod VBA dan mempunyai sedikit pengetahuan mengenai SEKARANG serta menulis kod tersebut.

Langkah 1: Mulakan subproses dengan memberikan nama makro.

Kod:

 Sub Sekarang_Contoh1 () Akhir Sub

Langkah 2: Nyatakan pemboleh ubah sebagai "Tarikh". Sebab mengapa kita perlu menyatakan pemboleh ubah sebagai "Tarikh" kerana hasil akhir kita adalah dalam format Tarikh dan Waktu.

Kod:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tarikh Akhir Sub

Langkah 3: Tetapkan nilai ke pemboleh ubah "k" dengan menerapkan fungsi VBA SEKARANG.

Kod:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tarikh k = Sekarang Akhir Sub

Langkah 4: Sekarang tunjukkan nilai fungsi SEKARANG yang telah kita tetapkan kepada pemboleh ubah "k" di kotak mesej di VBA.

Kod:

 Sub Sekarang_Contoh1 () Dim k Sebagai Tarikh k = Sekarang MsgBox k Tamat Sub

Ok, kita sudah selesai.

Jalankan kod menggunakan kekunci F5 atau secara manual dan lihat apa hasilnya.

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

Format tarikh komputer saya adalah "mm-dd-yyyy".

Kita juga dapat mengubah format tarikh dengan menggunakan fungsi FORMAT. Berikut adalah kod untuk menukar format tarikh.

Kod:

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

Jalankan kod dan lihat perbezaannya.

Sekarang kita mempunyai format tarikh dan waktu yang tepat. Dengan format ini, sesiapa sahaja dapat memahami format tarikh dan waktu.

Meruap di Alam:

Seperti yang anda lihat pada contoh pertama, kami mendapat keputusan masa 5:03:35 dan pada contoh kedua, kami memperoleh hasilnya pada 17:19:02. Jadi ini menunjukkan bahawa fungsi SEKARANG adalah fungsi tidak stabil yang berubah setiap saat.

Alternatif untuk Fungsi Pemasa dalam VBA

Sebagai alternatif kepada VBA TIMER, kita dapat menggunakan fungsi "VBA SEKARANG" untuk mengira jumlah masa yang diambil oleh makro untuk menyelesaikan tugas.

Gunakan kod di bawah untuk mengira masa yang diambil oleh kod anda.

C0de:

 Sub TotalDuration () Dim k As Date T = sekarang '' 'Masukkan kod anda di sini' '' MsgBox "Jumlah Masa yang Diambil oleh makro untuk menyelesaikan tugas adalah:" & _ Format ((Sekarang - k), "HH: MM : SS ") Sub Akhir

Di kawasan berwarna hijau salin dan tampal kod anda.

Laksanakan kod dengan menekan kekunci F5 atau tekan butang jalankan. Sebaik sahaja selesai pelaksanaannya, kita akan mendapatkan masa yang diambil oleh makro untuk menyelesaikan tugas tugas di kotak pesan. Di bawah ini adalah contoh yang sama.