Membuka atau Menutup UserForm Dalam Waktu Tertentu

Dalam kondisi tertentu barangkali kita menginginkan agar UserForm, perintah, atau code dijalankan dalam waktu tertentu, sehingga pengguna tidak perlu untuk mengeksekusi menggunakan perintah-perintah lain. dan dalam tutorial ini kita menggunakan UserForm sebagai bahan percobaan.

Perintah utama dalam menjalankan kondisi ini adalah menggunakan metode
Application.OnTime kode inilah yang kemudian dimasukkan dalam sebuah Module untuk berikutnya dijalankan.

contoh penggunaannya dalam sebuah module

Sub X ()
Application.OnTime Now + TimeValue ("00:00:05"), "Perintah_Lain"
End Sub

Application.Ontime :
digunakan untuk menjalankan sebuah prosedur dalam waktu yang sudah kita spesifikasikan
TimeValue :
merupakan sebuah kondisi dimana perintah akan dijalankan, dalam contoh di atas perintah akan dijalankan dalam hitungan 05 detik
Perintah_Lain :
adalah sebuah prosedur (Module) lain yang akan dijalankan ketika waktu yang yang kita masukkan sedang terjadi.
Untuk membuat prosedur "perintah_lain" maka kita membuat sebuah module baru yang berisi perintah atau kode-kode tertentu yang kita inginkan.
sebagai contoh :

Sub Perintah_Lain()
UserForm1.Show
End Sub

Artinya, ketika pengguna menjalankan perintah Sub X - pengguna harus menunggu sekitar 05 detik kemudian Sub Perintah_Lain akan dijalankan, dalam contoh diatas yakni menampilkan UserForm1

Ilustrasi dalam menggunakan metode ini sebagai berikut

Download file project tutorial di sini

Sumber Informasi :
http://www.rumahexcel.com/2013/07/membuka-atau-menutup-userform-dalam.html#ixzz2oLbC8E7k