Bonjour à tous.


J'ai un petit souci avec les boutons options.

Je dois demander à l'utilisateur de répondre à deux questions indépendantes par Oui ou par Non. J’ai opté pour les boutons options (que j'appelle A, B, C et D) suite à des problèmes sur d’autres Pc avec les Check box.


Je souhaite que l’utilisateur puisse par la suite répondre aux deux questions. Or, actuellement, lorsqu’il en coche une les 3 autres se dévalident.


Voici le code que j'ai écris :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 
    If A = True Then
 
        B = False
 
        Worksheets("CalculsDimensionPositionment").Cells(30, 4) = 1
 
    End If
 
 
 
    If B = True Then
 
        A = False
 
        Worksheets("CalculsDimensionPositionment").Cells(30, 4) = 0
 
    End If
Et

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
 
 
    If C = True Then
 
        D = False
 
        Worksheets("CalculsDimensionPositionment").Cells(36, 4) = 1
 
    End If
 
 
 
    If D = True Then
 
        C = False
 
        Worksheets("CalculsDimensionPositionment").Cells(36, 4) = 0
 
    End If

Je vous remercie pour votre aide.