Bonjour à tous!

je suis en train de faire un questionnaire dans lequel les questions sont posées dans des InputBox (pour le nom de la personne par exemple)

à la question concernant l'age de la personne je voudrais mettre des tranches (18 - 30, 31 - 50, 51 et plus) avec des option box les uns en dessous des autres. Selon la réponse choisie je voudrais recopier le résultat dans une case prcéise (disons B3) de la feuille active
existe-t-il un code similaire à

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
j = InputBox("Entrez votre nom de famille:", "Caractéristiques individuelles", "VOTRE NOM ICI")
Cells(1, 2).Value = j
mais dans lequel je puisse proposer des OptionButton?

Merci de votre aide!