VBA Timer kedua yang sederhana

Dalam VBA, timer kedua sederhana mudah untuk ditulis dan dimasukkan dalam kode sumber. VBA hadir dengan timer berfitur lengkap yang dapat digunakan kapan pun diperlukan. Namun, itu tidak wajib untuk menggunakan timer yang disediakan dengan VBA. Kontrol timer di VBA dapat dilakukan melalui timer manual juga. Ini bukan tugas yang rumit untuk membuat fungsi timer manual di VBA . Orang perlu menulis kode untuk membuat timer dalam modul publik. Dengan VBA, timer kedua sederhana dapat dibuat untuk meningkatkan dan menyesuaikan perangkat lunak Office terutama untuk lembar kerja Excel.

Di VBA ada fitur Timer yang tersedia, tetapi Anda juga dapat membuatnya dengan sangat mudah.

Dalam lembar modul:

 Private Sub Worksheet_SelectionChange (ByVal Target As Range) 'Misalnya: Mulai / Hentikan timer setiap kali sel. 'tetapi juga dapat ditempatkan pada tombol atau yang lain ... TimeOnOFF = Bukan TimeOnOFF Jika TimeOnOFF Kemudian Timer End Sub 

Dalam modul publik:

 TimeOnOFF Publik Sebagai Boolean Sub Timer () Dim S Sebagai Integer Sementara TimeOnOFF = Benar Jika Kedua (Sekarang)> S Atau Kedua (Sekarang) = 0 Kemudian 'Jalankan kode' .... 'misalnya Lembar ("shee1"). ("A1"). Nilai = Waktu S = Kedua (Sekarang) Berakhir Jika DoEvents Wend End Sub