Diskusi tentang Excel

Menutup UserForm dalam 10 Menit



Ada-ada ajah, jika Anda bisa load form secara otomatis dengan menggunakan script VBA. kali ini Anda juga harus bisa close form atau menutup userform secara otomatis dengan VBA pula. Script VBA ini sangat sederhana dan Jika Anda belum tahu bagaimana load form secara otomatis Anda tinggal menambahkan script

Userform1.show

Untuk menutup form dengan batasan waktu tertentu misalnya 10 detik form akan ditutup secara otomatis tanpa peringatan terlebih dahulu.

Buatlah module dan tuliskan script berikut ini

Public dTime As Date
Sub KillUserForm()
    Unload UserForm1
End Sub
Setelah Anda membuat module kemudian buat juga atau insert salah satu UserForm kemudian pilih proseduer Initialize dan tuliskan script dibawah ini

Private Sub UserForm_Initialize()
    dTime = Time + TimeValue("00:00:10")
    Application.OnTime dTime, "KillUserForm"
End Sub

Dari script diatas artinya jika userform aktif dalam 10 detik maka secara otomatis userform tersebut akan ditutup tanpa peringatan terlebih dahulu.

Untuk kasus seperti ini biasanya Anda akan melihat contoh ketika menyelesaikan soal ujian secara online biasanya untuk mengerjakan soal tersebut sudah ditentukan waktunya maka jika Anda belum menyelesaikan soal tersebut namun batas waktu sudah habis maka Anda tidak akan bisa mengisi soal yang belum dikerjakan tersebut.

Demikian semoga bermanfaat.

Related

UserForm 6838820252298335312

Post a Comment

Tulisan ini Bermanfaat..? Silakan berkomentar sesuai topik artikelnya, tidak dianjurkan menggunakan kata-kata yang dapat menimbulkan hal negatif. Mohon maaf apabila tidak memiliki etika akan Admin HAPUS tanpa pemberitahuan kembali. Terimakasih... salam Exceler

emo-but-icon

item