David pyta:
Cześć, muszę zaprojektować projekt i utknąłem na pewnym kawałku, który polega na projektowaniu makra, aby umożliwić użytkownikowi wprowadzenie liczby, ale problem, z którym się spotykam, polega na ustawieniu walidacji, która akceptuje tylko liczby z zakresu 1-10. Próbowałem ustawić walidację na określonych komórkach, ale problem ze skrzynką wejściową polega na tym, że nawet jeśli komórka została ustawiona tak, aby akceptowała tylko liczbę, akceptuje wszystko. Czy możesz mi pomóc, ponieważ tak naprawdę nie mogę kontynuować mojego projektu, dopóki to nie zostanie ukończone.
To makro będzie nadal prosić użytkownika o numer od 1 do 10 lub zatrzyma się, jeśli anuluje.
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
