Re : bloquer contenu textbox une fois modifiée
Private Sub CommandButton1_Click()
If Cells(LigneNom, 3).Offset(, 15) < 2 Then
Cells(LigneNom, 3).Offset(, 15) = IIf(Cells(LigneNom, 3).Offset(, 15) = 1, 2, 1)
Cells(LigneNom, 3) = TextBox1.Value
Else
TextBox1 = ActiveSheet.Range("C" &...