David demande:
Salut, je dois concevoir un projet et je suis coincé sur un peu qui conçoit une macro pour permettre à l'utilisateur de saisir un nombre, mais le problème auquel je suis confronté est de définir une validation qui n'accepterait que les nombres compris entre 1 et 10. J'ai essayé de définir une validation sur les cellules spécifiques mais le problème avec la boîte de saisie est que même si la cellule a été configurée pour n'accepter qu'un nombre, elle accepterait n'importe quoi. Pouvez-vous s'il vous plaît m'aider car je ne peux pas vraiment poursuivre mon projet tant que cela n'est pas fait.
Cette macro continuera à demander à l'utilisateur un nombre compris entre 1 et 10 ou s'arrêtera s'il annule.
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
