Permasalah di Excel saat menciptakan input memakai UserForm dan isian datanya memakai Textbox maka yang menjadi problem ialah ketikan memasukan data terkadang hanya dapat diisi data angka saja selain itu textbox tersebut akan menolak.
Contoh konkret Anda dapat lihat pada goresan pena Form Input Data SiswaSebuah isyarat NIS biasanya hanya memakai data angka bukan huruf. Kenapa kita harus memvalidasi atau membatasi hanya dengan data angka? hal ini dimaksudkan supaya untuk mengurangi tingkat kesalahan dalam mengentri data tersebut.
Ok, eksklusif saja berikut tahapan cara menciptakan validasi data angka pada texbox
Langkah pertama silakan buat userform lalu ViewCode nya dan ketikkan script berikut pada Userform tersebut
Private Sub HanyaAngka()
If TypeName(Me.ActiveControl) = "TextBox" Then
With Me.ActiveControl
If Not IsNumeric(.Value) And .Value <> vbNullString Then
MsgBox "Data yang diinput harus berupa angka saja"
.Value = vbNullString
End If
End With
End If
End Sub
Setelah Sript tersebut dibentuk langkah berikutnya ialah kita akan memanggil data angka dengan sebuah textbox namun sebelumnya silakan buat sebuah textbox pada userform1 tersebut kira-kira menyerupai dibawah ini. Untuk membuatnya sudah aku sampaikan. Lalu silakan tambahkan script berikut dibawahnya dengan prosedure Exit
Private Sub textbox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)Untuk lebih terang silakan tampilan gambar dan script menyerupai berikut ini
HanyaAngka
End Sub
Jika sudah simpulan silakan jalankan agenda dengan cara menekan tombol F5 lalu silakan ketikkan data selain angka maka akan keluar pesan peringatan "Data yang diinput harus berupa angka saja"
Berhasil, kita sudah dapat menciptakan script membatasi input hanya angka dengan validasi data angka pada textbox.
Selamat mencoba dan biar berhasil.
anda dapat kembangkan untuk menciptakan aplikasi-aplikasi berbasis Excel. Sumber http://www.excel-id.com/