Si case non vide --> verrouillage de celles-ci

Bonjour

Je suppose que si le code scanné s'inscrit sur la feuille il doit avoir une macro pour réaliser cette opération, donc il doit falloir ajouter cette opération dans la macro

Voir avec les personnes compétentes en VBA 

Bonjour,

Supposer les codes en colonne A, vous devez d'abord déverrouiller toutes les cellules de la colonne A. 

Vous pouvez utiliser le code suivant à mettre dans le module de la feuille concernée.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
    ActiveSheet.Unprotect
    With Range("A" & Target.Row)
        .Locked = True
        .FormulaHidden = False
    End With
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End If
End Sub

Bonjour,

Les 2 modifications, ligne 1 et 3:

If Target.Column < 6 Then
........
    
With Range(Target.Address)