David spør:
Hei, jeg må designe et prosjekt, og jeg sitter fast på litt som designer en makro slik at brukeren kan legge inn et nummer, men problemet jeg står overfor er å sette en validering som bare aksepterer tall mellom 1-10. Jeg prøvde å sette en validering på de spesifikke cellene, men problemet med innboks er at selv om cellen er satt til å bare akseptere et nummer, vil den akseptere noe. Kan du hjelpe, for jeg kan ikke virkelig fortsette med prosjektet mitt før dette er gjort.
Denne makroen vil fortsette å be brukeren om et tall mellom 1 og 10 eller vil stoppe hvis han / hun avbryter.
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
