Cara Membuat textbox di Excel tidak dapat diisi dengan Huruf


Kali ini kita akan memperbaiki dan menyempurnakan tutorial sebelumnya tentang TextBox. Tujuannya adalah agar TextBox hanya bisa diisi dengan angka 0 sampai 9. Caranya sangat sederhana, kita akan membuat sebuah prosedur khusus yang akan dijalankan setiap kali pengguna menekan tombol pada keyboard saat berada di dalam TextBox. Prosedur ini akan memeriksa apakah karakter yang ditekan merupakan angka atau bukan. dengan penggunaan Prosedur KeyPress




-------------------------------------------------------------------------------------------

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

Select Case KeyAscii

   Case Asc("0") To Asc("9")

   Case Else

     KeyAscii = 0

End Select

End Sub