David kysyy:
Hei Minun on suunniteltava projekti ja olen juuttunut hiukan, joka suunnittelee makroa, jotta käyttäjä voi syöttää numeron, mutta kohtaamani ongelma on vahvistaa vahvistus, joka hyväksyy vain numerot välillä 1-10. Yritin asettaa vahvistuksen tietyille soluille, mutta syöttölaatikon ongelma on, että vaikka solu olisi asetettu hyväksymään vain numero, se hyväksyisi kaiken. Voitteko auttaa, koska en voi todella jatkaa projektiini ennen kuin tämä on tehty.
Tämä makro kysyy edelleen käyttäjältä numeroa välillä 1-10 tai pysähtyy, jos hän peruuttaa.
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
