Bonjour,
Grâce à vous, j'ai des cellules qui désactive des boutons "oui" ou "non" dans un questionnaire que quelqu'un doit remplir.
En voici le code :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Derli As Long, Li As Long, Col As Long
  If Target.Count > 1 Or Target.Column > 6 Or Target.Row < 4 Then Exit Sub
  
  Derli = Range("A65536").End(xlUp).Row
  Li = Target.Row
  Col = Target.Column
  
  ' clic en colonne A ou B pour initialiser
  Select Case Col
    Case 1, 2
      If Target <> "" Then
        Range("C" & Li) = "¡"
        Range("E" & Li) = "¡"
        Sheets("Echelles").Cells(Li, "D") = ""
      End If
      
    Case 3, 4
      Cells(Li, 3) = "¤"
      Cells(Li, 5) = "¡"
      Sheets("Echelles").Cells(Li, "D") = "oui"
      
    Case 5, 6
      Cells(Li, 5) = "¤"
      Cells(Li, 3) = "¡"
      Sheets("Echelles").Cells(Li, "D") = "non"
      
    End Select
End Sub
Je voudrais savoir s'il m'est possible de désactiver cette fonction, le temps que l'utilisateur remplisse le questionnaire, pour éviter qu'il fasse disparaître par erreurs ses propres choix (sur 600 questions, ce serait très ennuyeux) ; puis de la réactiver par la suite pour un nouveau questionnaire.
En m'expliquant la syntaxe du code, cela m'aidera aussi à comprendre votre démarche.
Merci de votre aide.