Jeda VBA

Jeda VBA

Jeda Kode VBA Dari Menjalankan

Jeda VBA dapat digunakan untuk menjeda kode agar dieksekusi selama waktu tertentu dan untuk menjeda kode di VBA. Kami menggunakan metode application.wait.

Saat kami membangun proyek VBA besar setelah melakukan sesuatu, kami mungkin perlu menunggu beberapa saat untuk melakukan tugas lain. Jadi, bagaimana kita menjeda kode makro untuk melakukan tugas kita dalam skenario seperti itu? Kami dapat menjeda kode VBA untuk jangka waktu tertentu menggunakan dua fungsi. Fungsi tersebut adalah “Tunggu” dan “Tidur”.

Anda bebas menggunakan gambar ini di situs web Anda, templat, dll., Harap berikan kami tautan atribusiBagaimana Memberikan Atribusi? Tautan Artikel menjadi Hyperlink
Misalnya: Sumber: Jeda VBA (wallstreetmojo.com)

Bagaimana Cara Menjeda Kode menggunakan Metode Tunggu?

‘Tunggu’ adalah fungsi di VBAFunction Dalam fungsi VBAVBA melayani tujuan utama untuk melakukan perhitungan tertentu dan mengembalikan nilai. Oleh karena itu, di VBA, kami menggunakan sintaks untuk menentukan parameter dan tipe data saat mendefinisikan fungsi. Fungsi semacam itu disebut fungsi yang ditentukan pengguna. Baca lebih lanjut untuk menjaga agar makro tetap berjalan selama jangka waktu tertentu. Jadi, dengan menerapkan fungsi ini, kita perlu mengetahui kapan kode kita harus menunggu.

Misalnya, jika mengeksekusi kode pada 13:00:00, jika Anda memberikan waktu sebagai “13:15:00”, Makro akan tetap berjalan selama 15 menit.

Sekarang, lihat argumen fungsi WAIT di Fungsi VBAWAIT Di VBAFungsi Tunggu VBA bawaan, juga dikenal sebagai metode Application.Wait, menjeda eksekusi program untuk periode waktu tertentu (tidak kurang dari 1 detik).baca lebih lanjut.

Kita harus menyebutkan kapan kode kita harus jeda atau menunggu dalam argumen waktu.

Sebagai contoh, lihat kode VBA di bawah Kode VBA Kode VBA mengacu pada serangkaian instruksi yang ditulis oleh pengguna dalam bahasa pemrograman Aplikasi Visual Basic pada Editor Visual Basic (VBE) untuk melakukan tugas tertentu.Baca lebih lanjut.

Kode:

Sub Pause_Example1() Range(“A1”).Value = “Hello” Range(“A2”).Value = “Welcome” Application.Wait (“13:15:00”) Range(“A3″).Value = ” Ke VBA” Akhiri Sub

Ingat, saat menjalankan kode ini, waktu sistem saya adalah 13:00:00. Segera setelah kami menjalankan kode, itu akan mengeksekusi dua baris pertama yaitu

Range(“A1”).Value = “Halo’ & Range(“A2”).Value = “Selamat datang”

Tetapi jika Anda melihat baris berikutnya, tertulis Application.Wait (“13:15:00”), jadi setelah menjalankan tugas baris tersebut, Makro saya akan dijeda selama 15 menit, yaitu mulai pukul 13:00:00, itu akan menunggu hingga waktu sistem saya mencapai 13:15:01.

Setelah sistem saya mencapai waktu itu, baris kode yang tersisa akan dieksekusi.

Range(“A3”).Nilai = “Ke VBA”

Namun, ini bukan cara terbaik untuk mempraktikkan kode jeda. Misalnya, katakanlah Anda menjalankan kode pada waktu yang berbeda. Kemudian kita perlu menggunakan fungsi NOW VBA NOW Fungsi VBA NOW adalah fungsi tanggal dan waktu di VBA yang digunakan untuk mendapatkan tanggal dan waktu sistem saat ini. Fungsi VBA Now tidak menerima argumen apa pun dan hasil pengembalian untuk fungsi ini adalah tanggal. Baca lebih lanjut dengan fungsi TIME VALUE.

Sekarang fungsi mengembalikan tanggal & waktu saat ini sesuai sistem yang sedang kita kerjakan.

TIME Value menyimpan waktu dari 00:00:00 hingga 23:59:29.

Asumsikan kita perlu menjeda kode selama 10 menit setiap kali kita menjalankan kode. Kemudian, kita dapat menggunakan kode di bawah ini.

Kode:

Sub Pause_Example1() Range(“A1”).Value = “Hello” Range(“A2”).Value = “Welcome” Application.Wait (Now() + TimeValue(“00:00:10″)) Range(” A3″).Nilai = “Ke VBA” End Sub

Ini mirip dengan kode sebelumnya, tetapi satu-satunya perbedaan adalah kami telah menambahkan fungsi NOW dan TIME VALUE.

Setiap kali kami menjalankan kode ini, itu akan menahan atau menjeda eksekusi selama 10 menit.

Bagaimana Cara Menjeda Kode VBA menggunakan Metode Tidur?

Tidur adalah fungsi yang rumit di VBA karena ini bukan fungsi bawaan. Karena ini bukan bawaan untuk membuatnya tersedia untuk digunakan, kita perlu menambahkan kode di bawah ini ke bagian atas modul kita.

Kode:

#Jika VBA7 Kemudian Publik Deklarasikan PtrSafe Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As LongPtr) ‘Untuk Sistem 64 Bit #Else Public Deklarasikan Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As Long) #End If ‘Untuk Sistem 32 Bit

Anda harus menyalin kode di atas dan menempelkannya di bagian atas modul.

Kita perlu menambahkan kode di atas karena SLEEP adalah fungsi VBA yang disajikan dalam file DLL Windows, jadi kita perlu mendeklarasikan nomenklatur sebelum memulai subprosedur.

Mari kita lihat contoh fungsi SLEEP sekarang.

Kode:

Sub Pause_Example2() Dim StartTime As String Dim EndTime As String StartTime = Time MsgBox StartTime Sleep (10000) EndTime = Time MsgBox EndTime End Sub

Pertama, kami telah mendeklarasikan dua variabel sebagai String.

Redupkan Waktu Mulai Sebagai String Redupkan Waktu Akhir Sebagai String

Kemudian kami menetapkan TIME excelTIME ExcelTime adalah fungsi lembar kerja waktu di Excel yang digunakan untuk menghitung waktu berdasarkan input yang diberikan oleh pengguna. Argumen dapat mengambil format berikut: jam, menit, dan detik. Baca lebih lanjut fungsi ke variabel Waktu Mulai. Fungsi TIME mengembalikan waktu saat ini sesuai sistem.

Waktu Mulai = Waktu

Kemudian kami telah menetapkan hal yang sama untuk ditampilkan di kotak pesan.

Waktu Mulai MsgBox

Kemudian, kami menerapkan fungsi SLEEP sebagai Sleep (10000).

Di sini 10.000 adalah milidetik, yang sama dengan 10 detik di VBA.

Kemudian, kita akhirnya menugaskan satu lagi fungsi TIME ke variabel EndTime .

Sekarang lagi, kami telah menulis kode untuk menunjukkan waktu.

Waktu Akhir = Waktu

Ini akan menunjukkan perbedaan antara waktu mulai dan waktu berakhir.

Kami sekarang akan mengeksekusi kode dan melihat waktu mulai.

Saat kami mengeksekusi kode, waktu sistem saya adalah 13:40:48. Sekarang, kode saya akan tidur selama 10 detik. Jadi, pada akhirnya, waktu saya adalah sebagai berikut.

Jadi, seperti ini, kita dapat menjeda kode agar tidak dieksekusi selama waktu tertentu.

Artikel yang Direkomendasikan

Artikel ini adalah panduan untuk Metode Jeda VBA. Di sini, kami membahas cara menjeda kode agar tidak berjalan menggunakan fungsi SLEEP dan WAIT for di Excel VBA dengan contoh dan lembar Excel yang dapat diunduh. Anda dapat mempelajari lebih lanjut tentang VBA dari artikel berikut: –

  • Fungsi VBA InStr
  • VBA COUNTIF
  • Fungsi Val VBA
  • Bilah Kemajuan VBA

Related Posts

Tinggalkan Balasan