David bertanya:
Hai Saya harus merancang sebuah proyek dan saya terjebak pada sedikit yang merancang makro untuk memungkinkan pengguna memasukkan nomor, tetapi masalah yang saya hadapi adalah menyetel validasi yang hanya akan menerima angka antara 1-10. Saya mencoba mengatur validasi pada sel tertentu tetapi masalah dengan kotak masukan adalah bahwa bahkan jika sel telah diatur untuk hanya menerima nomor, ia akan menerima apa pun. Bisakah Anda membantu karena saya tidak dapat benar-benar melanjutkan proyek saya sampai ini selesai.
Makro ini akan terus meminta nomor antara 1 dan 10 kepada pengguna atau akan berhenti jika dia membatalkan.
Sub Test() Dim MyAns As Variant Ask: MyAns = Application.InputBox("Enter a number between 1 and 10", Type:=1) If MyAns = False Then Exit Sub If MyAns 10 Then GoTo Ask: MsgBox MyAns, vbInformation, "Good Number" End Sub
