Materi kali ini aku akan membehas bagaimana coding atau script VBA untuk memaksa user mengisi textbox yang telah disediakan pada aplikasi excel dan apabila tidak diisi maka agenda atau aplikasi tidak dapat dilanjutkan. Hal ini akan mensugesti user untuk mengisi biodata pada textbox area.
Coding ini cukup sederhana dengan budi atau fungsi If memakai coding atau script VBA. Saya akan mencoba mendesain userform ibarat berikut ini, namun sebelumnya hasil dari coding dan desain form yang akan kita buat untuk lebih jelasnya alhasil ibarat berikut ini
Perhatikan gambar diatas, ada textbox isian yang harus diisi oleh user yaitu Nama Operator dan aku coba untuk tidak mengisi textbox tersebut maka alhasil yaitu muncul sebuah pesan "Silakan Tuliskan Operator" ini artinya bahsa pengguna aplikasi harus mengisikan nama operator untuk dapat melanjutkan ke penggunaan aplikasi. Misalnya aku akan coba bila nama operator pada textbox input tersebut aku isikan dengan nama terserah Anda misalkan aku tuliskan "Yatna Supriyatna" maka akan userform tersebut akan di close dan agenda akan menload userform berikutnya.
Jika aku klik tombol OK maka alhasil akan menuju ke form Menu.
Untuk dapat menciptakan ibarat hasil diatas Anda harus tambahkan coding pada mekanisme CommandButton_Click dan silakan tuliskan coding atau script VBA dibawah ini
Private Sub CommandButton1_Click()
If TextBox1.Value = "" Then
MsgBox "Silakan Tuliskan Operator", vbInformation
TextBox1.SetFocus
Exit Sub
Else
Unload Me
UserForm16.Show
End If
End Sub
Silakan dicoba coding yang telah dituliskan ibarat diatas, untuk menjalankannya silakan tekan tombol F5 atau Run pada Icon VBA Editor.
Selamat mencoba, agar bermanfaat.
Sumber http://www.excel-id.com/