Choix dans une cellule

Bonjour,

Je voudrais savoir s'il existe une façon de ne pas avoir à cliquer sur le menu déroulant en E2 pour faire un choix.

Parce que l'utilisateur doit répondre à plus de 200 questions et je ne veux pas qu'il ait à cliquer toujours une fois pour ensuite faire sont choix dans le menu déroulant (2 cliques)...

Connaissez vous une solution pour qu'en un clique on puisse répondre à des choix de réponse sans avoir à créer tout plein de bouton radio...

Merci beaucoup

JL

J'ai trouvé je vais y aller avec des checkbox!

Merci

JL

Bonjour,

Une alternative avec un double clic et une présentation différente.

Cdlt.

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, [G2:J21]) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
        Cancel = True
        Select Case Target.Value
            Case Is = ""
                Target.Value = "P"
                Target.Font.Name = "Wingdings 2"
                If Application.CountA(Range(Cells(Target.Row, 1), Cells(Target.Row, 10))) > 1 Then
                    MsgBox "1 choix par question.", 64
                    Target.Value = ""
                End If
            Case Else
                Target.Value = ""
                Target.Font.Name = "Calibri"
        End Select
    End If

End Sub

Tu dors jamais Jean-Éric!

Wow merci pour la solution alternative. Je vais voir si je peux formater ma feuille en conséquence.

Et bonne nuit ou bon matin!

A+

JL