David vraagt:
Hallo, ik moet een project ontwerpen en ik zit vast aan een bit dat een macro ontwerpt zodat de gebruiker een nummer kan invoeren, maar het probleem dat ik tegenkom is het instellen van een validatie die alleen nummers tussen 1-10 accepteert. Ik heb geprobeerd een validatie in te stellen voor de specifieke cellen, maar het probleem met de inputbox is dat zelfs als de cel is ingesteld om alleen een nummer te accepteren, deze alles zou accepteren. Kun je alsjeblieft helpen, want ik kan pas echt doorgaan met mijn project als dit klaar is.
Deze macro zal de gebruiker blijven vragen om een nummer tussen 1 en 10 of zal stoppen als hij / zij annuleert.
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
